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Vorwort 


Die weite Verbreitung der Programmiersprache BASIC hat dazu 
beigetragen, daß heute unzählige BASIC-Dialekte bestehen. Es 
gibt kaum noch einen Computer, der sich mit dem von der ameri¬ 
kanischen Normbehörde ANSI festgelegten MIN STANDARD 
begnügt. Praktisch alle neuen BASIC-Versionen erlauben auch Zei¬ 
chenkettenverarbeitung und Fließkommarechnung. Auch mehr 
oder minder komfortable Befehle für die Erstellung von Grafiken 
und für die Tonerzeugung sind heute üblich. 

Leider werden im erweiterten BASIC nicht immer die gleichen 
Befehlswörter verwendet, und nicht alle heute üblichen Zusatzbe¬ 
fehle laufen auf allen Computern. Oft ist auch noch die Wirkung 
ähnlicher Befehle auf verschiedenen Computern unterschiedlich, 
auch wenn das gleiche Befehlswort verwendet wird. 

Wer Grundkenntnisse in BASIC erworben und die ersten kleinen 
Programme selbst geschrieben hat, wird bald den Wunsch hegen, 
auch an größere Aufgaben heranzugehen. Hierfür braucht er Vor¬ 
bilder, und die findet er in Büchern und Fachzeitschriften; nur muß 
er sie auch verstehen und nachvollziehen können. 

Dieses Buch will helfen, indem es die wesentlichen Unterschiede 
der einzelnen BASIC-Dialekte erklärt und Hinweise gibt, wie man 
das eigene BASIC prüfen und gegebenenfalls dort nicht vorhan¬ 
dene Befehle ersetzen kann. 

Obwohl es kaum zwei von verschiedenen Computerherstellern 
angebotene BASIC-Versionen gibt, die sich in allen Einzelheiten 
gleichen, hat sich doch eine Art »BASIC-Hochsprache« herausge¬ 
bildet, die auf (fast) allen Computern läuft. Sie wird im 1. Kapitel 
behandelt. 

Alle neueren BASIC-Dialekte sind aber weiter ausgebaut. Die bei 
den erweiterten BASIC-Versionen üblichen Befehle werden im 2. 
Kapitel erklärt. 
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Wenn auch bei den Grafik- und Tonbefehlen vielfach die gleichen 
Befehlswörter verwendet werden, so sind die Möglichkeiten, die 
dem Programmierer auf diesen Gebieten geboten werden, doch 
sehr unterschiedlich. Der prinzipielle Aufbau dieser Befehle wird 
im 3. Kapitel behandelt. 

Da nicht nur die Befehle, sondern auch ihre Wirkung, d. h. das 
Laufverhalten, unterschiedlich ausfallen können, zeigen wir im 4. 
Kapitel eine Reihe von Tests, mit denen jeder das Laufverhalten 
seines Computers überprüfen kann. 

Meist werden in Programmen aber noch weitere computerspezifi¬ 
sche Befehle verwendet. Reine Ubersetzungstabellen für die Wand¬ 
lung der Befehle einer Version in eine andere sind unübersichtlich 
und mühsam zu benutzen. Im 5. Kapitel, in dem wir die besonde¬ 
ren Eigenschaften von 20 viel verwendeten BASIC-Dialekten 
erklären, beschreiten wir darum einen anderen Weg. 

Ausgehend von den Befehlen der BASIC-Hochsprache und von 
den wichtigsten Befehlen des erweiterten BASIC wird nur das in 
den einzelnen Abschnitten behandelt, was vom Grundstock 
abweicht. Daß hierbei allerdings nicht alle Einzelheiten erschöp¬ 
fend erklärt werden können, ergibt sich aus dem Umfang eines 
Taschenbuchs. 

In den weiteren Kapiteln geben wir konkrete Hinweise, wie man 
fremde Programme verstehen und in die eigene BASIC-Version 
konvertieren kann. Hierzu gehört der Ersatz fehlender Befehle 
ebenso wie die Erklärung von Befehlsverwendungen, die nicht auf 
den ersten Blick verständlich sind. 

Bei der Komplexheit der Materie kann dieses Buch keine »Kochre¬ 
zepte« anbieten, wie man Programme umstellt. Es gibt aber eine 
Fülle von Hinweisen und Anregungen, wie man dabei vorgehen 
kann. 

Vor allem soll dieses Buch helfen, auf fremden Computern entwik- 
kelte Programme zu verstehen, um daraus zu lernen und um diese 
auf dem eigenen Computer (vielleicht in noch verbesserter Form) 
selbst zu gestalten. 

Nicht zuletzt wollen wir durch dieses Buch alle, die Programme 
veröffentlichen wollen, dazu anregen, ihre Programme so einfach 
wie möglich mit den allgemein verwendeten Befehlen zu schreiben, 
damit auch andere Computerfreunde davon Nutzen haben können. 


Dr. Hans-Joachim Sacht 
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1. Die Befehle der BASIC- 



Von der amerikanischen Normbehörde wurde vor einigen Jahren 
eine Normung für BASIC vorgeschlagen, die als ANSI MIN 
STANDARD bekannt wurde. Sie reicht einerseits heute für die 
universelle Verwendung von BASIC nicht mehr aus, enthält ander¬ 
seits aber einige Befehle, die in moderne Versionen nicht aufge¬ 
nommen wurden. Vor allem gehören die im ANSI MIN STAN¬ 
DARD nicht enthaltenen Befehle für die Behandlung von Zeichen¬ 
ketten heute zu den bei allen Versionen vorhandenen Grundbe¬ 
fehlen. 

Bei dieser Gelegenheit muß zunächst noch eine im Deutschen ent¬ 
standene Sprachverwirrung geklärt werden. Die Worte »Befehl«, 
»Kommando« und »Anweisung« werden leider in der deutschspra¬ 
chigen Computerliteratur nicht eindeutig verwendet. In diesem 
Buch wird Befehl für alle BASIC-Schlüsselwörter gebraucht, die 
den Computer zu einer bestimmten Arbeit veranlassen. Ein Befehl 
kann dementsprechend ein direktes Kommando sein, das der Com¬ 
puter sofort nach der Eingabe ausführt, oder eine Anweisung^ die 
im Programm steht und erst zur Verarbeitung kommt, wenn die 
betreffende Zeile beim Programmablauf an der Reihe ist. 

Die Tabelle Abb. 1 zeigt die Befehle, die bei allen modernen, voll 
ausgebauten BASIC-Versionen verfügbar sind. Man kann mit die¬ 
sen Befehlen schon praktisch alle Programmieraufgaben (ohne 
Dateiverwaltung, Grafik und Tonerzeugung) lösen. Programme, 
die nur unter Benutzung dieser Befehle geschrieben wurden, sind 
gut verständlich. Sie laufen mit geringfügigen Anpassungen auf 
allen Computern. Man kann also mit Recht behaupten, daß sich 
hier eine Art »BASIC-Hochsprache« herausgebildet hat. 

Die Tabelle enthält keine Befehle für die Bedienung von externen 
Speichern und Druckern, die natürlich in allen BASIC-Versionen 
enthalten sein müssen. Es existieren also stets weitere Befehle. Sie 
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Die wichtigsten BASIC-Befehle 


c 

RUN 

Startet ein Programm 

(0 

E 8 

LIST 

Gibt Programmliste aus 

E -o 

NEW 

Löscht Programmspeicher 

o 

CONT 

Fortsetzung Programmlauf 


PRINT.... 

Ausgabebefehl 


LET=... 

Wertzuweisung an Variable 


INPUT 

Aufforderung zur Dateneingabe 


READ 

Einlesen von Daten 


DATA. 

Daten im Programm 


GOTO... 

Unbedingter Sprung 

0) 

FOR. 

= ..TO..STEP 

Schleifendefinition 

c 

NEXT.. 

Schleifenende 

w 

IF ... THEN ... ELSE 

Bedingter Befehl 

ü) 

GOSUB... 

Anruf Unterprogramm 

c 

< 

ON.. 

GOTO... 

Errechneter Einsprung 


RETURN 

Rücksprung zum Hauptprogramm 


DIM. 

(...) 

Speicherplatzreservierung 


STOP 

Anhalten des Programmlaufs 


END 

Ende des Programms 


REM 

Für Kommentarzeilen 

r“ 


Addition 

= 

Gleichheit 

o 

- 

Subtraktion 

0 

ungleich 

o 

♦ 

Multiplikation 

> 

größer als 

0 

/ 

Division 

)= 

größer oder gleich 

Q. 

o 

A 

Potenzierung 

< 

kleiner als 


(.) 

Vorrang 

<= 

kleiner oder gleich 


AND 

OR 

NOT 

Logische Verknüpfungen 


ABS (X) Absolutwert 

SQR (X) Quadratwurzel 


SGN (X) Vorzeichen 


EXP (X) 

ü s 

CO Ä 

INT (X) Ganze Zahl 


LOG (X) Logarithmus 

•c o 

SIN (X) Sinus 


LN (X) Natürl. Logarithmus 

E c 

COS (X) Cosinus 


RND (0) Zufallszahl 

D 3 

z ^ 

TAN (X) Tangens 


TAB (X) Tabulatorstellen 


ATN (X) Arcustangens 

SPG (X) Zwischenräume 


LEN (XS) 

Länge der Zeichenkette 

c 

0 c 

ASC (XS) 

ASCII Code des 1. Zeichens, dezimal 

0 

0 C 

OHR S (X) 

Zeichen entsprechend ASCII dezimal 

|.i 

VAL (XS) 

Wandelt Ziffernkette in Zahl 

0 5 
-c c 

STR S (X) 

Wandelt Zahl in Ziffernkette 

.9 3 

Q) LL 

LEFT S (XS. n) 

Trennt die n vorderen Zeichen ab 

N 

RIGHT S (XS. n) 

Trennt die n hinteren Zeichen ab 


MID S (XS. m. n) 

Trennt vom mten Zeichen n Zeichen ab 


Abb. 1: Die Befehle der BASIC-Hochsprache 
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weichen aber viel deutlicher voneinander ab als die Grundbefehle. 
Ganz besonders gilt dies für die Grafikbefehle und für die Befehle 
zur Tonerzeugung, deren Wirkung bei den verschiedenen Dialek¬ 
ten kaum noch vergleichbar ist. 

Leider bestehen aber auch bei den Befehlen der BASIC-Hoch- 
sprache noch Abweichungen in den einzelnen Dialekten, die bei 
der Konvertierung von Programmen Beachtung finden müssen. Im 
folgenden wird darum der Wortschatz der BASIC-Hochsprache 
genau erklärt und auf mögliche Unterschiede hingewiesen. 


1.1 Kommandos 

Die größte Übereinstimmung herrscht bei den Kommandos, also 

bei den Befehlen, die der Computer im Direktbetrieb verarbeitet. 

RUN Das Kommando für den Programmstart ist fast im¬ 

mer mit nachgestellter Zeilennummer zulässig. Alle 
Variablenspeicher werden gelöscht. Einige BASIC- 
Versionen erlauben die Verwendung dieses Komman¬ 
dos auch als Programm-Anweisung, was für die Kop¬ 
pelung mehrerer Programme nützlich sein kann. 

LIST Bei dem Kommando für die Darstellung des Pro¬ 

gramms auf dem Bildschirm ist immer auch eine teil¬ 
weise Ausgabe möglich. Bei einigen Dialekten muß 
ein Minuszeichen zur Trennung der Zeilennummern, 
also zum Beispiel LIST 100—200, geschrieben wer¬ 
den. Andere verwenden das Komma. Man muß dann 
schreiben LIST 100,200. 

NEW Dieses Kommando wird immer benutzt, um das im 

Arbeitsspeicher stehende Programm zu löschen. Bei 
einigen Versionen wird hierfür SCR verwendet. Im 
allgemeinen wird aber das Programm nicht physika¬ 
lisch gelöscht, sondern nur der auf den Programm¬ 
anfang gerichtete Zeiger. Es gibt manchmal besondere 
Befehle oder auch Tricks, mit denen ein versehentlich 
gelöschtes Programm noch gerettet werden kann. 

CONT Mit diesem Kommando wird der Lauf eines mit 
BREAK oder STOP abgebrochenen Programms 
fortgesetzt, wenn keine Änderung erfolgt ist. 
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1.2 Operatoren 

Die Operatoren dienen in einem BASIC-Ausdruck zur Verbin¬ 
dung der dort stehenden Konstanten oder Variablen. Oft unter¬ 
scheidet man zwischen Rechenoperatoren, Vergleichsoperatoren 
und logischen Operatoren (englisch BOOLEAN OPERATOR). 
Fast keine Abweichungen gibt es bei den Rechenoperatoren. Bei 
den Vergleichsoperatoren und bei den logischen Operatoren regi¬ 
strieren wir jedoch Abweichungen in der Wirkung, da intern unter¬ 
schiedlich gearbeitet wird. 

+ — Bei den Operatoren für die Addition und die Sub¬ 

traktion gibt es keine dialektspezifischen Unter¬ 
schiede. 

* / Der Stern für die Multiplikation und der Schrägstrich 

für die Division werden allgemein verwendet. 

( ) Klammern begründen einen Vorrang bei Rechenope¬ 

rationen. Im übrigen gilt die Regel: Punkt vor Strich. 
Grundsätzlich wird nach dem AOS-Verfahren und 
nicht entsprechend UPN gerechnet. 

\ A Als Operator für die Potenzierung dient eigentlich 

der Aufwärtspfeil mit dem dezimalen ASCII-Code 
94. Da die Code von 91 bis 94 aber zum Beispiel bei 
der deutschen ASCII-Version für die großen Umlau¬ 
te verwendet werden, ist die Darstellung des Opera¬ 
tors für die Potenzierung manchmal etwas verwir¬ 
rend. Beim TRS 80 wird eine eckige Klammer ([), bei 
Genie der große Buchstabe A angezeigt bzw. ge¬ 
druckt. Bei einigen Versionen, nicht zuletzt dem PC 
100 , sind zwei hintereinander stehende Sterne 
zu benutzen. 

= Auch als Vergleichsoperatoren werden einheitliche 

< > Symbole verwendet. Trotzdem gibt es hier bemer- 

> = kenswerte Unterschiede bei der Wirkung im Befehl. 

< = Vielfach wird - 1 bei richtigem Vergleich und 0 bei 

unrichtigem Vergleichsergebnis erzeugt. Es gibt aber 
auch Dialekte, bei denen als Kennung für einen wah¬ 
ren Vergleich +1 gemeldet wird. 

Beim Vergleich von Buchstaben wird der ASCII- 
Codewert zugrunde gelegt, bei dem der Wert für A 
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kleiner ist als der für B und so fort. Während das 
Gleichheitszeichen allgemein verarbeitet wird, erlau¬ 
ben nicht alle BASIC-Versionen die Verwendung der 
Zeichen für »größer als« und »kleiner als« beim Ver¬ 
gleich von Buchstaben. 

<> >< Geringe Unterschiede registrieren wir bei dem Un- 
gleich-Operator. Meist werden zwei gegeneinander¬ 
gestellte Winkel verwendet. Einige Versionen gebrau¬ 
chen aber das Doppelkreuz (#). 

AND Die Operatoren für die logische Verknüpfung sind 

OR bei allen BASIC-Versionen gleich. Es ist üblich, daß 

NOT die vor und nach den Operatoren stehenden Zahlen 

zu Binärzahlen gewandelt und dann bitweise verar¬ 
beitet werden. Einige Computer geben das Ergebnis 
auch wieder als Zahl aus, andere behandeln die Argu¬ 
mente nur als »wahr« oder »falsch«. 

+ & Das mathematische oder - bei manchen Versionen - 

das kaufmännische Additionszeichen wird im allge¬ 
meinen als Operator für das Zusammenfügen von 
Zeichenketten ohne Zwischenraum verwendet. 

1.3 Satz- und Sonderzeichen 

Satz- und Sonderzeichen spielen bei allen Programmiersprachen 
eine große Rolle. BASIC verwendet nur die Zeichen, die praktisch 
auf allen Schreibmaschinentastaturen amerikanischer Bauart vor¬ 
handen sind. Es gibt hier Besonderheiten bei einigen BASIC-Ver¬ 
sionen, die nicht in den USA entstanden sind. Die amerikanischen 
Versionen behandeln zwar die Bedeutung der Zeichen im wesentli¬ 
chen gleich; trotzdem ergeben sich unterschiedliche Wirkungen bei 
einigen Zeichen und Befehlen. 

. Statt des bei uns üblichen Kommas wird immer der 

Punkt zur Dezimaltrennung verwendet. 

, Das Komma dient meist als Trennzeichen zwischen 

einzugebenden, zu druckenden, zu speichernden oder 
zu lesenden Ausdrücken beziehungsweise Variablen. 
Es gibt aber recht unterschiedliche Wirkungen, je 
nachdem, in welchen Befehlen es benutzt wird. 

; Auch das Semikolon dient als Trennzeichen in eini¬ 

gen Befehlen. Oft kann es zusätzlich am Ende einer 
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Druckzeile verwendet werden, um den Zeilenvor¬ 
schub zu verhindern. 

Der Doppelpunkt wird bei den meisten BASIC-Ver- 
sionen benutzt, um mehrere Befehle in einer Zeile 
voneinander zu trennen. Es gibt aber auch Versionen, 
die hierfür das Semikolon oder den Schrägstrich vor¬ 
schreiben. 

Anführungsstriche werden immer zur Kennzeich¬ 
nung von Zeichenketten verwendet. Meist dürfen sie 
darum im Inneren einer Kette nicht Vorkommen. Bei 
einigen Versionen können die abschließenden Anfüh¬ 
rungsstriche am Ende einer Programmzeile fehlen. 

Allgemein wird das Dollarzeichen zur Kennzeich¬ 
nung von Zeichenkettenvariablen verwendet. Der in 
Schweden entwickelte Computer ABC 80 verwendet 
statt dessen das schwedische Währungszeichen. 

Das Prozentzeichen dient als Kennzeichen für Ganz¬ 
zahl-Variable. 

Das Doppelkreuz (kaufmännisches Nummer-Zei¬ 
chen) dient bei einigen Computern zum Kennzeich¬ 
nen von Variablen mit doppelter Genauigkeit. Es 
wird auch bei Kassetten- und Diskettenbefehlen als 
Numerierungszeichen für die Kanal- oder Dateinum¬ 
mer verwendet. 

Das Ausrufungszeichen kennzeichnet bei einigen 
Computern Variable mit einfacher Genauigkeit. 

Das Fragezeichen wird allgemein als Kurzeingabe für 
den PRINT-Befehl anerkannt. Auf dem Bildschirm 
bedeutet es die Aufforderung zu einer Eingabe nach 
einem INPUT-Befehl. 

Das kaufmännische Zeichen für at (Klammeraffe) 
wird beim Genie und beim TRS 80 nach dem 
PRINT-Befehl verwendet, wenn die Bildschirmaus¬ 
gabe wie beim PRINT AT-Befehl an eine bestimmte 
Stelle geschrieben werden soll. Auf Druckern mit 
deutschem Zeichensatz wird es oft als § (Paragraph) 
gedruckt. 

Das Hochkomma (Apostroph) kann bei einigen Ver¬ 
sionen zur Kennzeichnung von Kommentaren be- 
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nutzt werden. Es sind aber auch andere Satzzeichen 
üblich. 

& Das kaufmännische Und-Zeichen wird bei einigen 

Dialekten als Vorzeichen für nicht-dezimale Zahlen¬ 
stellung verwendet. 


1.4 Funktionen 

Funktionen benötigen immer ein (meist in einer Klammer stehen¬ 
des) Argument. Es gibt BASIC-Versionen mit 50 und mehr ver¬ 
schiedenen Funktionen. Für die BASIC-Hochsprache genügt eine 
Reihe von Grundfunktionen, aus denen alle anderen abgeleitet 
werden können. Bei einigen Funktionen gibt es aber auch in der 
Hochsprache schon geringfügige Abweichungen. 


Numerische Funktionen mit Zahlen als Argument 

SIN Für trigonometrische Rechnungen sind immer die 

COS Funktionen für den Sinus, den Cosinus, den Tangens 

TAN und den Arcustangens verfügbar. Allgemein muß der 

ATN Winkel im Bogenmaß als Argument in die Funktion 

eingesetzt werden. Nur wenige Versionen erlauben 
die Eingabe von Winkelgraden nach vorangestelltem 
Grad-Befehl. 

ABS Die Funktion zur Bestimmung des Absolutwertes ei¬ 

ner Zahl ist immer im Befehlssatz enthalten. 

SGN Auch die Funktion, die das Vorzeichen einer Zahl 

ausgibt, ist immer verfügbar, obwohl sie leicht durch 
einen Vergleich mit 0 ersetzt werden könnte. 

SQR Speziell für die Berechnung der Quadratwurzel ist 

eine Funktion vorhanden. Andere Wurzeln können 
durch Potenzieren mit gebrochenem Exponenten be¬ 
rechnet werden. 

LOG Im allgemeinen wird mit der Logarithmus-Funktion 

der natürliche Logarithmus zur Grundzahl e be¬ 
rechnet. 

EXP Mit der EXP-Funktion wird die Zahl berechnet, die 

sich ergibt, wenn das Argument als Hochzahl zur 
Zahl e verwendet wird. 
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INT Diese Funktion rundet eine gebrochene Zahl auf die 

nächstkleinere Ganzzahl ab. Sie arbeitet also bei nega¬ 
tiven Zahlen etwas anders als die auch vielfach vor¬ 
handene FIX-Funktion, bei der immer die Nach¬ 
kommastellen abgeschnitten werden. 

RND Bei der Funktion zur Erzeugung von Zufallszahlen 

gibt es erhebliche Dialekt-Unterschiede bezüglich des 
einzusetzenden Arguments. Einige Varianten werden 
in den Kapiteln 4 und 5 erklärt. 

TAB Nach der Tabulator-Funktion darf in vielen BASIC- 

Versionen kein Zwischenraum vor der Klammer 
stehen. 

SPC Mit dem Argument in der Klammer wird die Anzahl 

von Leerstellen, die in einem PRINT-Befehl einge¬ 
setzt werden sollen, bestimmt. Einige BASIC-Versio- 
nen verwenden zu diesem Zweck die Funktion 
STRINGS (a,b), mit der a-mal die Wiederholung 
des als ASCII-Wert eingegebenen Zeichens b zu 
programmieren ist. 

FRE Beim Aufruf dieser Funktion melden viele Computer, 

je nach Argument, den gesamten freien Speicherraum 
oder den freien Raum zur Speicherung von Zeichen¬ 
ketten. Vielfach wird für den ersten Zweck auch 
MEM verwendet. 


Funktionen zur Wandlung von Zeichenketten 


LEN 

LEFT$ 

RIGHTS 

MID$ 

CHR$ 


Die Funktion zur Ausgabe der Länge einer Zeichen¬ 
kette ist in allen Versionen vorhanden, die Zeichen¬ 
kettenbearbeitung zulassen. 

Beide Funktionen dienen zum Abtrennen einer vor¬ 
gegebenen Anzahl von Zeichen vom linken oder 
rechten Ende der Kette. Sie sind nicht in allen Versio¬ 
nen verfügbar. 

Zum Aussondern eines oder mehrerer Zeichen in ei¬ 
ner Kette brauchen wir die MIDS-Funktion, die in 
einigen Versionen auch SEG$ heißt. 

Mit dieser recht oft verwendeten Funktion wird das 
ASCII-Zeichen erzeugt, dessen Code-Wert als Dezi¬ 
malzahl im Argument steht. 
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ASC Die Funktion stellt den dezimalen ASCII-Wert des 

ersten Zeichens der im Argument folgenden Zeichen¬ 
kette bereit. 

VAL Diese Funktion dient zur Wandlung einer aus Ziffern 

bestehenden Zeichenkette in eine Zahl, mit der ge¬ 
rechnet werden kann. 

STR$ Im Gegensatz zu VAL wandelt STR$ eine Zahl in 
eine Ziffernkette um. 


1.5 Programmanweisungen 

Die wichtigsten BASIC-Befehle sind die Programm-Anweisungen 
(Statements). Sie stehen im Programmbetrieb in Befehlszeilen, die 
der Computer an der vorangestellten Zeilennummer erkennt. Viele 
BASIC-Versionen erlauben die Verwendung der meisten Anwei¬ 
sungen auch als Kommandos im Direktbetrieb. Im übrigen gibt es 
in dieser Befehlsgruppe nur geringe Dialekt-Abweichungen, die 
aber doch bei einer Konvertierung zu beachten sind. 

DATA Einige Computer erlauben keine über mehrere Zeilen 
gehende DATA-Statements. Unterschiedlich ist auch 
die Schreibweise von Zeichenketten in diesem Befehl. 
Bei einigen Versionen können die Anführungszeichen 
am Anfang und am Ende eines Strings entfallen, wenn 
dieser nicht mit einem Leerzeichen beginnt. 

DIM Bei den meisten Dialekten brauchen nur Felder mit 

mehr als 10 oder 11 Elementen vorher dimensioniert 
zu werden. Es gibt aber auch BASIC-Versionen, die 
eine Dimensionierung der Länge von Zeichenketten 
vorschreiben. 

END Meistens ist der End-Befehl nicht erforderlich, wenn 

das Programm mit der letzten gespeicherten Pro¬ 
grammzeile endet. 

FOR...TO Der Schleifenbefehl kann in einzelnen Dialekten un¬ 
terschiedlich laufen, wenn die Bedingung für den Ab¬ 
bruch schon am Schleifenanfang erfüllt ist. Bei den 
meisten Dialekten erfolgt dann trotzdem ein Schlei¬ 
fendurchgang; bei wenigen wird die Schleife über¬ 
sprungen. 
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GOSUB Der Befehl zum Ansprung eines Unterprogramms ist 
bei allen BASIC-Versionen gleich. Unterschiede be¬ 
stehen lediglich hinsichtlich der Anzahl der erlaubten 
Verschachtelungen, das heißt, der noch nicht abge¬ 
schlossenen Unterprogramme. Bei einigen Versionen 
kann man als Sprungziel statt der Zeilennummer ei¬ 
nen Label-Namen angeben. 

GOTO Auch der unbedingte Sprungbefehl ist überall gleich. 

Er wird oft in zwei Wörtern GO TO geschrieben. 
Wenige Computer erlauben Rechenausdrücke statt 
einer vorgegebenen Zeilennummer als Sprungziel. 
Gelegentlich sind auch Label-Namen zugelassen. 

IF.. .THEN Beim Entscheidungsbefehl, der eine bedingte Ver¬ 
zweigung veranlaßt, gibt es einige Unterschiede. 
Meist kann nach THEN sofort die Zeilennummer des 
Sprungziels bei erfüllter Bedingung stehen. Oft wird 
auch GOTO statt THEN angenommen. Häufig kön¬ 
nen nach THEN ein oder mehrere beliebige andere 
Befehle folgen. Das Befehlswort ELSE, dem Befehle 
folgen, die bei nicht erfüllter Bedingung zu durchlau¬ 
fen sind, ist nicht bei allen Dialekten zulässig. Es gibt 
Dialekte, bei denen THEN durch ein Komma ersetzt 
werden kann. 

INPUT Mit diesem Befehl kann man eine Tastatureingabe ei¬ 
ner Variablen zuweisen. Die meisten Computer ver¬ 
weigern die Annahme einer Eingabe, wenn versucht 
wird, Buchstaben einer Zahlenvariablen zuzuordnen. 
Meist wird der Benutzer aufgefordert, die Eingaben 
zu wiederholen, ohne daß das Programm zum Ab¬ 
bruch kommt. Bei einigen BASIC-Versionen wird 
das Programm aber abgebrochen, wenn die RE- 
TURN-Taste ohne vorherige Betätigung einer ande¬ 
ren Taste gedrückt wird. 

Mehrere durch Kommas getrennte Eingaben sind 
vielfach zugelassen. Alle neueren Versionen erlauben 
auch, daß in den Eingabebefehl ein erklärender Text 
aufgenommen wird, der dann wie bei einem PRINT- 
Befehl ausgegeben wird. 

LET= Bei fast allen BASIC-Versionen kann das Befehlswort 
LET bei Zuweisungsbefehlen auch entfallen. Einige 
Computer melden einen Fehler, wenn im Programm 
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NEXT 

ON 

..GOTO 

ON 

..GOSUB 

PRINT 


READ 

REM 

RESTORE 


eine Variable angesprochen wird, der vorher noch 
kein Wert zugewiesen wurde. Andere setzen dann bei 
Zahlenvariablen 0 und bei Zeichenkettenvariablen ei¬ 
nen Leerstring ein. 

Dieses Befehlswort wird immer am Ende einer Schlei¬ 
fe verwendet. Meist braucht keine Variable eingesetzt 
zu werden, wenn nur eine einfache, unverschachtelte 
Schleife läuft. In einigen Versionen können dem Be¬ 
fehlswort auch mehrere Variable folgen, durch Kom¬ 
mas getrennt, und zwar dann, wenn mehrere Schlei¬ 
fen gemeinsam zum Ende kommen. 

Die Befehle für Mehrfachverzweigungen sind in allen 
BASIC-Versionen praktisch gleich. Geringe Unter¬ 
schiede kann es bei der Anzahl der erlaubten Ver¬ 
zweigungen geben und bei der Verarbeitung von fal¬ 
schen Eingaben für die Entscheidungsvariable. 

Der Ausgabebefehl kann praktisch immer bei der Ta¬ 
statureingabe durch das Fragezeichen ersetzt werden. 
In die Programmliste wird dann meist selbständig das 
Befehlswort PRINT eingesetzt. Als Trennzeichen 
sind fast immer das Komma und das Semikolon zu¬ 
lässig. Kommas bewirken die Ausgabe in Kolonnen. 
Semikolons ergeben bei Zeichenketten eine Darstel¬ 
lung ohne Zwischenräume. Bei Zahlen wird meist 
eine Freistelle hinter die Ziffern gesetzt und oft auch 
die Stelle vor den Ziffern freigelassen, wenn bei posi¬ 
tiven Zahlen kein Vorzeichen gesetzt wird. 

Der Befehl zum Einlesen von Daten aus DATA- 
Zeilen ist praktisch überall gleich. 

Mit diesem Kürzel können Kommentare im Pro¬ 
gramm gekennzeichnet werden, die der Computer im 
Programmlauf nicht beachtet. Bei einigen Computern 
genügt hierfür auch das Apostroph (’). Auch andere 
Kurzzeichen für diesen Befehl werden verwendet. 

veranlaßt den READ-Befehl, wieder Daten von der 
ersten Datenzeile ab zu lesen. Zulässig ist auch 
manchmal die Angabe der Zeilennummer, von der an 
erneut gelesen werden soll. 
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RETURN Dieser Befehl muß immer am Ende eines Unterpro¬ 
gramms stehen und bewirkt dann den Rücksprung 
zum Befehl nach dem Anruf des Unterprogramms. 

STEP Die Veränderung der Laufvariablen in FOR 

.. NEXT-Schleifen braucht allgemein nicht program¬ 
miert zu werden, wenn sie in Schritten von 1 erhöht 
werden soll. Bei einigen BASIC-Versionen dürfen 
nur Ganzzahlen hinter STEP eingesetzt werden. 

STOP Der Befehl zum Anhalten eines laufenden Programms 
lautet in einigen BASIC-Versionen BREAK. 


1.6 Befehlsschreibung 

Normalerweise werden die BASIC-Befehlswörter mit Großbuch¬ 
staben geschrieben. Einige Dialekte wandeln in Kleinbuchstaben 
eingegebene Befehle im Ausdruck selbsttätig in Großbuchstaben 
um. Es gibt allerdings auch Versionen, bei denen zwei verschiedene 
Zeichensätze schaltbar sind. In diesem Fall müssen oder können 
Befehlswörter klein geschrieben werden und bleiben im Listing 
auch stehen. 

Das Lesen eines Programms wird sehr erleichtert, wenn vor und 
hinter den BASIC-Befehlswörtern eine Leerstelle bleibt. Es gibt 
Dialekte, bei denen dies sogar Vorschrift ist. Andere setzen die 
Leerstellen automatisch oder erlauben die Befehlsschreibung mit 
und ohne Leerstellen. 

Die Länge der Befehlszeilen ist immer begrenzt. Zwischen 80 und 
ca. 255 Zeichen sind üblich. Meist können mehrere Befehle, durch 
Doppelpunkte getrennt, in eine Zeile geschrieben werden, wobei 
die Länge der Bildschirmzeile keine Rolle spielt. 

Da die BASIC-Befehle intern im Speicher immer als Code in einem 
Byte, genannt Token, abgelegt werden, bieten viele Computer die 
Möglichkeit, statt des vollen Befehlswortes nur eine Abkürzung 
auf der Tastatur einzugeben. Meist wird aber dann das ganze 
Befehlswort in das Listing eingesetzt. 
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2. Weitere Befehle der voll 
ausgebauten 


BASIC-Dialekte 


Es gibt heute kaum einen BASIC-Dialekt, der sich nur mit den 
Grundbefehlen der BASIC-Hochsprache begnügt. Auch wenn sie 
nicht ausdrücklich als »extended« bezeichnet werden, verarbeiten 
die meisten Dialekte noch viele weitere Befehle. 

Hier können wir aber keine Liste aller bekanntgewordenen 
BASIC-Befehle aufstellen, denn dafür ist deren Anzahl inzwischen 
schon zu groß. Es werden darum nur Befehle besprochen, die in 
einer ganzen Reihe von BASIC-Dialekten Vorkommen und die für 
allgemeine Programme wichtig sind. 

2.1 Zusätzliche Funktionen 

Einige BASIC-Versionen erlauben die Verwendung weiterer Funk¬ 
tionen. Eine Reihe davon, zum Beispiel die Hyperbel-Funktionen, 
werden nur für ganz bestimmte mathematische Aufgaben benötigt. 
Andere sind leicht abzuleiten. Die Bedeutung der meist verwende¬ 
ten zusätzlichen Funktionen wird im folgenden erklärt. 

BIN$ berechnet den Binärwert der als Argument eingesetz¬ 

ten Dezimalzahl. 

CDBL Bei den Computern, die das Rechnen mit verschiede- 
CINT ner Genauigkeit zulassen, gibt es meist Funktionen, 
CSNG die eine Änderung des Variablentyps innerhalb des 
Programms bewirken. Bei Verwendung von CINT 
erfolgt manchmal auch kaufmännische Rundung. 

DATES Das Datum wird als Zeichenkette zur Verfügung ge¬ 
stellt. 

EOF Die Funktion meldet das Ende der sequentiellen Da¬ 

tei, deren logische Nummer als Argument eingesetzt 
ist. 
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FIX 

oder 

TRUNC 

Im Gegensatz zu INT schneidet diese Funktion die 
Nachkommastellen bei positiven und negativen Zah¬ 
len einfach ab. 

HEX$ 

wandelt die im Argument stehende Zahl in eine 
Hexadezimalzahl um. 

INSTR 

Mit dieser Funktion kann der Anfang eines Teil¬ 
strings innerhalb einer Zeichenkette, gegebenenfalls 
ab einem bestimmten Byte, ermittelt werden. Gelie¬ 
fert wird ein numerischer Ausdruck. 

LOC 

Die Funktion meldet den zuletzt in einer wahlfrei 
lesbaren Datei bearbeiteten Datensatz. 

EOF 

Die Funktion liefert die Anzahl der Datensätze in 
einer wahlfrei lesbaren Datei. 

POS 

Die Funktion meldet bei einigen Dialekten die Cur¬ 
sor-Position in der Zeile. 

STRINGS 

Als Argument sind bei dieser Funktion zwei Ganz¬ 
zahlen einzusetzen. Die erste davon bestimmt, wie oft 
das Zeichen, dessen dezimaler ASCII-Wert als zwei¬ 
tes im Argument steht, auf dem Bildschirm mit einem 
PRINT-Befehl ausgegeben werden soll. 

TIMES 

Die Uhrzeit wird in Form einer Zeichenkette zur 
weiteren Verarbeitung zur Verfügung gestellt. 


2.2 Weitere Programmanweisungen 

Anweisungen für den Programmlauf 

BYE Das ursprünglich im Timesharing-Betrieb zum Ab- 


CLEAR 

melden verwendete Befehlswort wird jetzt manchmal 
für den Übergang von BASIC in den Monitor ver¬ 
wendet. 

Dieser Befehl löscht alle Variablenspeicher. Bei eini¬ 
gen Versionen bedeutet eine dem Befehl folgende 
Zahl die Anzahl der Speicherplätze, die für die Spei¬ 
cherung der Zeichen in Zeichenketten reserviert wer¬ 
den. Es gibt auch Versionen, bei denen mit diesem 
Befehl ein Speicherbereich abgetrennt werden kann, 
auf den BASIC dann keinen Zugriff hat. 
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CLS 

oder 

HOME 


DEF FN 


DEFDBL 

DEFINT 

DEFSNG 

DEFSTR 

DIV 

GET 

oder 

INKEYS 


INP 

OUT 


KEY 

LINE 

INPUT 


LOCATE 


Es gibt meist einen Befehl, mit dem die Anzeige auf 
dem Bildschirm gelöscht und der Cursor in die linke 
obere Ecke gesetzt werden kann. Manchmal muß al¬ 
lerdings hierfür auch ein Unterprogramm angerufen 
werden (CALL CLEAR). 

Mit diesem Befehl kann der Anwender selbst eine 
Funktion definieren. Die Syntax ist aber unterschied¬ 
lich, da bei einigen Dialekten nur numerische Funk¬ 
tionen, bei anderen auch Zeichenketten definiert wer¬ 
den können. 

Diese Befehle dienen zur Festlegung bestimmter Va- 
riablen-Namen auf bestimmte Variablentypen. Nach 
der Definition brauchen im weiteren Programm die 
Typenkennzeichen (#, %, !, $) nicht mehr verwendet 
zu werden. 

Operator für eine Ganzzahldivision. 

Normalerweise nutzen wir bei BASIC den INPUT- 
Befehl für die Eingabe. Bei diesem Befehl besteht aber 
der Nachteil, daß einige Satzzeichen, wie das Kom¬ 
ma, der Doppelpunkt und die Anführungszeichen, 
nicht mit eingegeben werden können. Bei sehr vielen 
BASIC-Versionen steht darum noch ein weiterer Ein¬ 
gabebefehl zur Verfügung, der jedes beliebige Zei¬ 
chen von der Tastatur annimmt. Hierfür werden ver¬ 
schiedene Befehlswörter verwendet, und die Wir¬ 
kung, auch die Syntax dieses Befehls variiert. 

Bei den Mikroprozessoren der Typen 8085 und Z 80 
können 256 Ausgabekanäle direkt angesprochen wer¬ 
den. Computer, die einen dieser Prozessoren verwen¬ 
den, haben meist auch Befehle, mit denen diese 
Kanäle in BASIC bedient werden können. 

zur Programmierung selbst zu programmierender 
Funktionstasten. 

Dieser verbesserte INPUT-Befehl erlaubt auch die 
Eingabe von Kommas, Doppelpunkten usw. und 
übernimmt alle Zeichen bis zum Wagenrücklauf- 
Kommando. 

Dieser Befehl erlaubt es, den Cursor auf eine be¬ 
stimmte Bildschirmposition zu setzen. Beim nächsten 
PRINT-Befehl erscheint dann die Ausgabe an der 
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MAT 


MOD 


OPTION 

BASE 

PRINT AT 
oder 

PRINT® 


PRINT 

USING 


RANDO- 

MIZE 

REPEAT 

UNTIL 


RESTOREz 


SWAP 

SCREEN 

WHILE 

WAIT 


Stelle, deren Zeilen- und Spaltennummer im Befehl 
steht. 

Einige mathematisch orientierte BASIC-Dialekte ent¬ 
halten besondere Befehle zur Matrizenverarbeitung. 

Dieser Operator dient in einigen Dialekten zur Be¬ 
stimmung eines Divisionsrestes. 

setzt manchmal den ersten verwendbaren Index eines 
Feldes wahlweise auf 0 oder 1. 

Diese Befehle erlauben die Positionierung der Ausga¬ 
be. Bei PRINT AT ist meist die Zeile und die Spalte, 
bei PRINT® dagegen die (durchnumerierte) Bild¬ 
schirmposition einzusetzen. 

Dieser Befehl erlaubt die formatierte Ausgabe von 
Zahlen. Die Dezimalpunkte werden untereinander 
gesetzt und die Nachkommastellen nach Vorschrift 
gerundet. Die Anweisung, wie die Ausgabe erfolgen 
soll, muß meist in einer Zeichenkette vor dem Anruf 
des Befehls festgelegt werden. 

Befehl, der in vielen Versionen dem Zufallsgenerator 
einen neuen Anfangswert .zuweist. 

Schleifenbefehle, bei denen der Abbruch erfolgt, 
wenn eine Bedingung am Ende nicht erfüllt ist. 
Manchmal auch als DO... UNTIL geschrieben. 

Im Gegensatz zur üblichen Wirkung des Befehls, der 
das Lesen wieder von der ersten DATA-Zeile ab ver¬ 
anlaßt, lassen es diverse Dialekte zu, daß nach dem 
Befehlswort diejenige Zeilennummer eingesetzt wird, 
von der an DATA-Zeilen gelesen werden sollen. 

Der Befehl erlaubt das Tauschen der Namen zweier 
Variablen. 

Der Befehl ermöglicht die Anwahl verschiedener 
Bildschirmspeicher, manchmal auch die Wahl eines 
Grafikmodus. 

Die Schleifenbefehle WHILE... END prüfen die 
Abbruchbedingung zu Beginn jedes Schleifenlaufs. 

Computer, die mit dem Mikroprozessor 65xx arbei¬ 
ten, haben oft einen Wartebefehl auch in BASIC. Die 
Regeln für die Verwendung sind aber unterschiedlich. 

25 


2.3 Anweisungen für Fehlerbehand¬ 
lung im Programm 


Findet der Interpreter in einem BASIC-Programm einen Fehler, sei 
es durch falsche Programmierung, sei es aber auch durch falsche 
Eingabe, so wird das Programm abgebrochen und der Fehler 
gemeldet. Dies kann sehr nachteilig sein, denn beim Neustart des 
Programms werden normalerweise die Inhalte der Variablenspei¬ 
cher gelöscht. 

Bei vielen BASIC-Versionen gibt es darum besondere Befehle, mit 
deren Hilfe der Programmabbruch beim Auffinden eines Fehlers 
vermieden werden kann. Im wesentlichen werden hierfür die fol¬ 
genden Befehlswörter gebraucht: 


ON 

ERROR 

GOTO 


ERL 

ERR 


Wird in das Programm an beliebiger Stelle dieser Be¬ 
fehl gesetzt, so erfolgt kein Programmabbruch, wenn 
der Computer irgendeinen Fehler feststellt. Der Pro¬ 
grammlauf wird an dem im Befehl stehenden Sprung¬ 
ziel fortgesetzt. Dort muß ein Befehl stehen, der be¬ 
stimmt, was bei einem Fehler geschehen soll. 

In der Fehlerbehandlungsroutine kann untersucht 
werden, wo ein Fehler aufgetreten ist und um wel¬ 
chen Fehler es sich handelt. ERL gibt die Zeilennum¬ 
mer aus, in der der Fehler festgestellt wurde. ERR 
zeigt den vom Computer festgestellten Code des Feh¬ 
lers. 


RESUME Nach der Beendigung der Fehlerbehandlung kann mit 
diesem Befehlswort der normale Programmablauf 
fortgesetzt werden, wobei es für die Fortsetzung oft 
noch verschiedene Möglichkeiten gibt. 


2.4 Ausgaben auf angeschlossene 
Drucker 

Alle Home- und Personal-Computer bieten die Möglichkeit, 
Drucker anzuschließen und anzusprechen. Leider werden aber von 
den verschiedenen BASIC-Dialekten für die Bedienung externer 
Geräte recht unterschiedliche Methoden verwendet. 
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Anschluß über besondere Schnittstelle 

Drucker werden heute fast allgemein entweder über die serielle 
Schnittstelle V 24 (RS 232 C) oder über die mit paralleler Daten¬ 
übertragung arbeitende Centronics-Schnittstelle angesteuert. Es 
werden dann besondere Druckbefehle verwendet, an denen der 
Computer erkennt, daß er die Ausgabe nicht an den Bildschirm, 
sondern an den Drucker leiten soll. Üblich sind die folgenden Be¬ 
fehlswörter: 

LLIST Die Programmliste wird auf dem Drucker erstellt. 

Der Ausdruck von Einzelzeilen oder Zeilenblöcken 
ist wie beim LIST-Befehl zu programmieren. Die 
gleiche Wirkung haben bei einigen Dialekten die Be¬ 
fehle LIST/P oder ähnliches. 

LPRINT Der Befehl arbeitet genauso wie der einfache PRINT- 
Befehl. Komma, Semikolon, die TAB-Funktion und 
gegebenenfalls die Formatierung mit USING sind zu¬ 
lässig, nicht aber PRINT AT oder Befehle zur Cur¬ 
sorpositionierung. Die Ausgabe erfolgt nur auf dem 
Drucker. 


Anschluß über lEEE-Bus 

Einige weit verbreitete Computer (z. B. Commodore) haben kei¬ 
men separaten Hardwareanschluß für den Drucker. Dieser muß an 
den für alle Peripheriegeräte zuständigen lEEE-Bus angeschlossen 
werden. Dies bedeutet, daß vor dem Ansprechen des Druckers 
immer erst per Software ein Kanal zum Drucker geöffnet werden 
muß. Hierfür sind folgende zwei Befehle üblich: 

OPEN Der Öffnungsbefehl muß als Parameter meist noch 
einige Angaben wie Gerätenummer, logische Kanal¬ 
nummer und Sekundäradresse enthalten. Nach der 
Öffnung des Kanals zum Drucker wirken die norma¬ 
len PRINT-Befehle statt auf den Bildschirm nur auf 
den Drucker. 

CMD Dieser Befehl, gleichfalls mit nachfolgenden Parame¬ 

tern, leitet auch die Ausgabe auf einen Ausgabekanal 
um. Er kann z. B. vor dem LIST-Kommando zur 
Ausgabe der Programmliste auf dem Drucker ver¬ 
wendet werden. 


27 


2.5 Programm- und Datenspeiche¬ 
rung auf Kassetten 

Programmspeicherung 

Die BASIC-Befehle für die Programmspeicherung sind zwar bei 
allen Computern ähnlich. In keinem Fall kann aber ein auf Kassette 
gespeichertes Programm in einen Computer einer anderen Bauart 
gelesen werden. Es gibt eine große Anzahl verschiedener Aufzeich¬ 
nungsverfahren. Darüber hinaus sind aber auch noch die Methoden 
des Datenverkehrs zwischen Computer und Recorder unterschied¬ 
lich. 

Meist besteht die Möglichkeit, bei der Kassettenspeicherung einen 
Programmnamen zu verwenden. Die Vorschriften für den Namen 
sind aber uneinheitlich. Einige BASIC-Dialekte unterstützen auch 
die Verwendung von 2 Recordern. 

Die Kassettenrecorder werden immer über eine besondere Schnitt¬ 
stelle angeschlossen. Bei einigen Computern wird das Laufwerk 
durch den Computer gesteuert, bei anderen erfolgt eine Aufforde¬ 
rung hierzu auf dem Bildschirm. Vor- und zurückspulen muß aller¬ 
dings immer der Benutzer selbst. 

Bei den meisten BASIC-Versionen können angeschlossene Recor¬ 
der mit besonderen Kommandos direkt angesprochen werden 
(Abb. 2). Üblich sind die Befehle: 


LOAD 

oder 

CLOAD 


SAVE 

oder 

CSAVE 

CLOAD? 

oder 

VERIFY 


Der Befehl zum Laden eines Programms kann als Pa¬ 
rameter noch die Angabe des verwendeten Recorders 
(wenn mehr als einer angeschlossen werden kann) 
und eines Programmnamens erfordern. 

Der Speicherbefehl für ein Programm ist meist ähn¬ 
lich wie der Ladebefehl aufgebaut. Die Anfügung ei¬ 
nes Programmnamens oder eines Kennbuchstabens 
ist meist zwingend. 

Mit einem dieser Befehle kann geprüft werden, ob die 
Abspeicherung eines Programms einwandfrei ge¬ 
glückt ist. Das Programm bleibt gegebenenfalls für 
einen neuen Speicherversuch im Arbeitsspeicher 
stehen. 
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SD Abb. 2: Befehle für Kassetten betrieb bei verschiedenen Computern 











Datenspeicherung 

Nicht alle BASIC-Versionen erlauben die Speicherung beliebiger 
Daten auf einer Kassette. Bei einigen Computern (z. B. Genie/TRS 
80, Apple) werden für die Datenspeicherung auf Kassetten andere 
Befehle verwendet als bei Disketten. Es gibt aber auch Computer, 
die Kassettenrecorder und Diskettenstationen gleich behandeln. 


Dateiname 

IHEADERI 



Datei = Ein oder mehrere Datensätze 
Datensatz =• Ein oder mehrere Datenfelder 

Abb. 3: Schema einer »sequentiellen Datei« 


Wenn die Speicherung von Daten auf Kassetten erlaubt ist, erfolgt 
sie in Form der sequentiellen Datei (Abb. 3). Hierfür werden in 
den meisten Fällen die folgenden Anweisungen verwendet: 

OPEN Für die Datenspeicherung muß meist mit diesem Be¬ 
fehl ein Pufferspeicherbereich und/oder ein Ausgabe¬ 
kanal bereitgestellt werden. Die dem Befehl folgen¬ 
den Parameter stimmen nicht überein. 

PRINT# Meist dient der PRINT#-Befehl mit nachfolgender 
Ziffer als Ausgabebefehl. Die weitere Syntax ist aber 
unterschiedlich. Oft können dem PRINT#-Befehl 
mehrere Konstante oder Variable folgen; sie müssen 
aber durch ein im betreffenden Dialekt zugelassenes 
Trennzeichen (Komma, Semikolon, CR o. a.) ge¬ 
trennt sein. 
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INPUT# Der Datenübernahmebefehl entspricht weitgehend 
dem normalen INPUT-Befehl. Kommas sind als 
Trennzeichen zulässig. 

Einige BASIC-Dialekte (z. B. Applesoft) erlauben die Datenspei¬ 
cherung nur in Form numerischer Felder. Es werden dann folgende 
Befehle verwendet: 

STORE X Das Feld mit dem Namen x wird komplett abgespei¬ 
chert. 

REGALE X Die gespeicherten Daten werden geladen und dem 
Feld X zugewiesen. 


2.6 Befehle für Diskettenbetrieb 


Für den Betrieb mit Disketten muß immer ein besonderes Betriebs¬ 
programm tätig sein, das meist von einer Diskette zu laden ist. Es 
wird Disketten Operations System (DOS) genannt und unterstützt 
eine Reihe von DOS-Kommandos zur Verwaltung der Dateien auf 
einer Diskette und weitere Anweisungen, die im Programm für die 
Datenspeicherung und für das Wiedereinlesen der Daten in den 
Arbeitsspeicher verwendet werden können. 


Grundsätzlich speichern und suchen alle DOS eine Datei nach dem 
vom Benutzer nach gewissen Regeln frei gewählten Dateinamen. 
Um den Ort, an dem die Daten physikalisch gespeichert sind, 
braucht er sich nicht zu kümmern. 

Üblich sind auch direkte Kommandos in der Befehlsebene DOS, 
die oft durch ein besonderes Kommando anzurufen ist, wenn sonst 
in BASIC gearbeitet wird. 


DIR 

oder 

CATALOG 

SAVE 

LOAD 

FORMAT 

INIT 

NEW 


zum Abrufen des Inhaltsverzeichnisses der auf einer 
Diskette gespeicherten Dateien. 


Speichern eines Programms auf eine Diskette. 

Laden eines Programms von einer Diskette. 

Bevor eine Diskette benutzt werden kann, müssen in 
die^einzelnen Spuren gewisse Kennwerte geschrieben 
werden. Hierfür sind verschiedene Kommandos ge¬ 
bräuchlich. 
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SCRATCH Auch zum Löschen einer auf der Diskette stehenden 
KILL Datei werden verschiedene Befehlswörter verwendet. 

DELETE 

COPY Ein sehr wichtiger Befehl ist der Kopierbefehl, mit 
dem Dateien von einer Diskette auf eine andere über¬ 
tragen werden können. 

Den meisten Kommandos müssen noch einige Parameter folgen, 
deren Aufbau und Bedeutung bei den verschiedenen DOS sehr 
unterschiedlich ist. 

Bei einigen DOS muß vor dem Ansprechen einer Diskette immer 
erst ein Datenkanal zur Diskette geöffnet werden. Dies ist notwen¬ 
dig, wenn Daten in eine Datei geschrieben oder daraus gelesen 
werden sollen. Hierfür wird stets der Befehl OPEN verwendet, bei 
dem allerdings die erforderlichen beziehungsweise zugelassenen 
Parameter sehr unterschiedlich aussehen. Im übrigen sind folgende 
Befehle für den Datenverkehr üblich: 

PRINT# n schreibt Daten in die unter Nummer n geöffnete 
Datei. 

INPUT# n liest Daten aus der Datei Nummer n. 

WRITE ähnlich PRINT#. 

READ ähnlich INPUT. 

CLOSE schließt geöffnete Dateien. 

AP- fügt Daten an vorhandene Datei Nummer n an. 

PEND#n 

Alle DOS unterstützen sequentielle Dateien, bei denen sämtliche 
Daten nacheinander - nur durch bestimmte Trennzeichen getrennt 
- gespeichert werden. Zur Bearbeitung müssen sie als Ganzes in 
den Arbeitsspeicher geladen und danach auch als Ganzes wieder 
gespeichert werden. 

Viele DOS erlauben die Anlage von Dateien mit wahlfreiem 
Zugriff auf einzelne Datensätze. Dies bedeutet, daß einzelne Daten 
verändert werden können, ohne daß die ganze Datei in den 
Arbeitsspeicher übernommen werden muß. Hier sind zwei ver¬ 
schiedene Typen üblich, die in Abb. 4 erklärt werden. 

Bei Dateien mit fester Satzlänge muß diese in einem Parameter des 
Öffnungsbefehls festgelegt werden. In den Datensätzen können 
dann mehrere Variable (Datenfelder), durch Trennzeichen 
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getrennt, gespeichert werden. Die Datensätze werden gezählt und 
können unter ihrer Nummer aufgerufen werden. Oft wird hierfür 
der folgende Befehl verwendet: 

RECORD bewirkt, daß beim nächsten Lese- oder Schreibvor- 
a, b gang auf den Satz a, gegebenenfalls vom bten Byte an, 

zugegriffen wird. 


Datenfelder 



Feldeinteilung 


fÄTI 

1 B$ i CM 

H 

reiröume 


1 1 
1 j 


1 B$ H C$ 


lB$t%^ C$ 

^ — 1. Datensatz — ^ 

—2. Datensatz — ^ 


Abb. 4: Zwei Typen von wahlfrei iesbaren Dateien 

a. Datei mit Trennzeichen zwischen den Datenfeldern 

b. Datei mit fester Feldeinteilung in einem Befehl 


Bei anderen Dialekten muß die Satz- und die Bytenummer in den 
Lese- oder Schreibbefehlen stehen. 

Bei der zweiten gebräuchlichen Art wahlfrei lesbarer Dateien muß 
vorher der Aufbau der Datenfelder im Datensatz, d. h. die maxi¬ 
male Länge jeder zu speichernden Variablen, festgelegt werden. 
Für diese Feldeinteilung wird meist folgende Anweisung ver¬ 
wendet: 

FIELD#n,B$ AS c,D$ AS e,F$ AS g... 

Im Befehl ist für jeden Variablennamen nach dem Befehlswort AS 
die Anzahl der Byte einzusetzen, die die Variable höchstens haben 
darf. 


Zur Bedeutung der Symbole in den Befehlen beachten Sie bitte den Kasten auf Seite 
91 . 
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Die Einteilung gilt für alle Sätze der unter Nummer n geöffneten 
Datei so lange, bis im Programmlauf eine neue FIELD-Anweisung 
angetroffen wird. Es ist also möglich, in einer Datei mit verschiede¬ 
nen Einteilungen zu arbeiten. 

In dem Programm gelten dann folgende Anweisungen: 

GET n,s Lesen des Satzes s der Datei Nummer n und Zuwei¬ 
sung der Daten an die im FIELD-Befehl genannten 
Variablen. 

PUT n,s Speichern der im FIELD-Befehl genannten Variablen 
in den Satz s der Datei Nummer n. 

Vor dem Speichern müssen die in beliebigen Variablen im Arbeits¬ 
speicher stehenden Daten den Variablen im FIELD-Befehl zuge¬ 
wiesen werden. Hierfür gelten die folgenden Befehle: 

LSET B$=E$ setzt E$ linksbündig in das für B$ reservierte 
Datenfeld. 

RSET B$=E$ setzt E$ rechtsbündig in das für B$ reservierte 
Datenfeld. 

Im allgemeinen werden alle Daten als Zeichenketten gespeichert. 
Sollen Zahlen in komprimierter Form gespeichert werden, gibt es 
dafür besondere Wandlungsbefehle: 

LSET B$ = MKI$(E%) setzt die Integervariable E% in das 2- 

Byte-lange Feld B$. 

LSET C$ = MKS$(E!) setzt die Variable mit einfacher Genau¬ 
igkeit E! in das 4-Byte-lange Feld C $. 

LSET DS = MKD$(E#) setzt die doppelt genaue Variable E# in 
das 8-Byte-lange Feld D$. 

Weitere vielseitig zu nutzende Dateitypen bieten die Betriebs¬ 
systeme NEWDOS und G-DOS, bei denen die Vorteile der 
sequentiellen und der wahlfrei lesbaren Dateien vereinigt werden. 

Von einigen DOS wird auch noch ein Dateityp angeboten, bei dem 
der Zugriff auf einzelne Daten möglich ist. Jedoch muß der Pro¬ 
grammierer hier die Adressenverwaltung (Spur und Sektor auf der 
Diskette) selbst durchführen. Diese Dateien erfordern darum 
erheblichen Programmaufwand und gute Programmierkenntnisse. 

Meist gibt es dann noch Befehle für sogenannte Binärdateien^ mit 
denen ganze Speicherbereiche des Arbeitsspeichers als Datei auf 
eine Diskette geschrieben werden können. 
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2.7 Zugriff auf die Maschinensprache 

Auch bei der Programmierung in BASIC arbeitet ein Computer 
intern immer nur mit den Befehlen der Maschinensprache, die der 
als Zentraleinheit verwendete Mikroprozessor versteht. Die 
BASIC-Befehle werden durch den Interpreter in die Maschinen¬ 
sprache übersetzt. 

Es gibt aber in allen voll ausgebauten BASIC-Dialekten auch 
Befehle, mit denen innerhalb eines BASIC-Programms direkt auf 
die Speicheradressen des Arbeitsspeichers zugegriffen werden 
kann. Weiterhin ist es möglich, Unterprogramme in Maschinen¬ 
sprache in einem BASIC-Programm anzurufen. 

Direkter Zugriff auf die Adressen 
des Arbeitsspeichers 

PEEK Wenn in die Klammer dieser Funktion als Argument 
eine Speicheradresse geschrieben wird, stellt sie den 
dort gespeicherten Inhalt als Dezimalzahl von 0 bis 
255 zur Verfügung. Wird die Funktion in einen 
PRINT-Befehl geschrieben, wird der Wert ausge¬ 
geben. 

Obwohl bei allen mit einem Mikroprozessor arbei¬ 
tenden Computern Adressen von 0 bis 65536 an¬ 
sprechbar sind, können manchmal nur die Adreß- 
inhalte des Schreib-Lese-Speichers (RAM) geholt 
werden. Ist eine Adresse hardwaremäßig nicht be¬ 
setzt, kann es eine Fehlermeldung geben. 

Die Adresse muß meist als Dezimalzahl in die Klam¬ 
mer der Funktion gesetzt werden. Hierbei gibt es 
aber noch zwei Dialektvarianten. Bei neueren Dialek¬ 
ten ist es oft möglich, dort Dezimalzahlen von 
0—65535 einzusetzen, andere Dialekte speichern die 
Zeilennummern als Ganzzahl von —32768 bis 
+32767. Alle Zeilennummern über 32767 müssen 
dann in die Komplementzahl umgerechnet werden 
(siehe das Beispiel in Absatz 7.5). 

POKE Mit diesem Befehl werden bestimmte Bitmuster in die 
im Befehl stehende Adresse geschrieben. Adresse und 
Bitmuster sind als Dezimalzahlen durch ein Komma 
getrennt einzusetzen. 
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VARPTR Da BASIC mit dynamischer Speicherverwaltung ar¬ 
beitet und der Programmierer keinen Einfluß auf die 
Adressen hat, in denen Variable abgelegt werden, gibt 
es bei neueren BASIC-Dialekten oft eine Funktion, 
mit der die Adressen abgefragt werden können. Für 
ihre Anwendung muß man die Art, wie der betreffen¬ 
de Computer die Variable speichert, genau kennen 
(siehe Beispiel in Abb. 11, Seite 86). 

Die für den Speicherzugriff verwendeten Befehle sind zwar in allen 
BASIC-Dialekten gleich. Trotzdem ist es sehr schwer, Programme, 
in denen direkt auf Speicheradressen zugegriffen wird, zum Lauf 
auf einem anderen Computer umzuschreiben. Auch wenn der glei¬ 
che Mikroprozessor in zwei verschiedenen Computern verwendet 
wird, heißt dies noch lange nicht, daß für gleiche Zwecke auch 
gleiche Adressen benutzt werden. Eine Programmkonvertierung 
setzt also eine genaue Kenntnis der Speicherbelegung beider Com¬ 
puter voraus. 

Inwieweit überhaupt direkte Zugriffe auf Speicheradressen für die 
Programmierung notwendig sind, hängt im wesentlichen vom Aus¬ 
bau der verwendeten BASIC-Version ab. Gut und benutzerfreund¬ 
lich ausgestattete Versionen haben für alle denkbaren Aufgaben 
BASIC-Befehle. Im Gegensatz dazu erfordern ältere und weniger 
komfortable Dialekte vielfach direkten Speicherzugriff mit POKE- 
Befehlen, wenn im Programm bestimmte Vorgänge ablaufen sollen. 
So kann man zum Beispiel die Negativdarstellung bei vielen Dia¬ 
lekten durch einen BASIC-Befehl (INVERSE) veranlassen, wäh¬ 
rend man bei anderen mit POKE in eine bestimmte Speicherstelle 
einen bestimmten Wert setzen muß. 

Verwendung von Unterprogrammen 
in Maschinensprache 

Es gibt fast immer eine Möglichkeit, in einem BASIC-Programm 
auch Routinen der Maschinensprache aufzurufen. Die Befehle hier¬ 
für sind in allen Dialekten ähnlich, aber in ihrer Wirkung doch 
recht uneinheitlich. 

CALL Oft kann ein Unterprogramm einfach mit dem 
CALL-Befehl plus nachfolgendem Programmnamen 
aufgerufen werden. Dies gilt sowohl für fest in den 
Interpreter eingebaute Programme, als auch für Ma¬ 
schinensprache-Unterprogramme, die der Benutzer 
selbst schreibt. 
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USR 

oder 

SYS 


DEFUSR 


In den meisten Fällen ruft man vom Benutzer ge¬ 
schriebene Unterprogramme mit der USR-Funktion 
an, die im Argument einen Hinweis auf die Speicher¬ 
adresse des Programms enthalten muß. Hier sind ver¬ 
schiedene Methoden üblich. Parameterübergabe kann 
vorgesehen sein. 

Die Speicheradressen für mehrere Unterprogramme 
können oft zu Beginn des Programms definiert 
werden. 


Wenn selbstgeschriebene Maschinensprache-Unterprogramme ver¬ 
wendet werden sollen, ist es meist notwendig, dafür Speicherraum 
freizuhalten, auf den BASIC nicht zugreifen kann. Oft erfolgt dies 
bereits beim Einschalten auf die Frage MEM SIZE?. Auch der 
CLEAR-Befehl wird hierfür mitverwendet. 


Hilfen für Programmierung in Maschinensprache 

In Maschinensprache geschriebene Programmteile können durch 
eine Schleife mit dem POKE-Befehl direkt in Speicheradressen 
geschrieben werden. Sind die Befehle hexadezimal codiert, müssen 
sie vorher in Dezimalzahlen gewandelt werden. Einige BASIC- 
Dialekte bieten aber auch die Möglichkeit, Hexadezimalzahlen in 
BASIC-Programmen zu verwenden. 

Oft gibt es ein besonderes Programm, MONITOR genannt, das 
die Programmierung in Maschinensprache erleichtert. Anruf und 
Aufbau dieser Programme fallen aber recht verschieden aus. 


2.8 Kommandos zur Erleichterung 
der Programm-Entwicklung 

Viele BASIC-Versionen haben Kommandos (die zum Teil auch als 
Anweisungen laufen), mit denen das Programmieren erleichtert 
wird. Die wichtigsten Befehle aus dieser Gruppe lauten wie folgt: 

AUTO Nach diesem Kommando wird nach jedem RETURN 
selbsttätig eine neue Zeilennummer an den Anfang 
der Zeile gesetzt, wobei die Anfangszeilennummer 
und die Schrittweite gewählt werden können. 

EDIT Bei einigen BASIC-Versionen ist für die Korrektur 

einer schon gespeicherten Zeile der Anruf eines 
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besonderen Betriebsprogramms mit dem Namen 
EDITOR notwendig. Manchmal geht der Computer 
auch automatisch in die Betriebsart EDITOR, wenn 
im Programmlauf ein Fehler gefunden wurde. 

TRAGE Einige Computer erlauben einen TRACE-Betrieb, 

NOTRACE bei dem der Computer die Zeilennummern aller ver¬ 
arbeiteten Zeilen auf den Bildschirm schreibt, so daß 
man verfolgen kann, wie das Programm gelaufen ist. 
Es werden statt TRAGE auch TRON und FLOW 
und statt NOTRACE auch TROFF, NOFLOW und 
UNTRACE verwendet. 

STEP Manche BASIC-Versionen ermöglichen den Schritt- 

Betrieb, bei dem das Programm jeweils nur einen Be¬ 
fehl ausführt und dann wartet, bis die RETURN- 
Taste betätigt wurde. 

RENUM Dieses Kommando erlaubt bei vielen Dialekten die 
Neunumerierung eines im Arbeitsspeicher stehenden 
Programms. Komfortable Dialekte gestatten es zu¬ 
sätzlich, nur bestimmte Teile eines Programms zu än¬ 
dern. Dann kann die Struktur mit Hunderternum¬ 
mern am Anfang eines Programm-Moduls erhalten 
bleiben. Bei einfacheren Dialekten können nur alle 
Befehle von einer bestimmten Zeilennummer ab neu 
numeriert werden. Gute BASIC-Versionen rechnen 
bei diesem Kommando alle Sprungziele selbsttätig 
um. 

DELETE Mit diesem Kommando kann eine oder können meh¬ 
rere Zeilen im Programm gelöscht werden. 
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3. Grafik-, Farb- 
und Tonbefehle 


Wie alle älteren Programmiersprachen, so war auch BASIC 
ursprünglich nur für Datenverarbeitung konzipiert und enthielt 
darum auch keine besonderen Grafikbefehle oder Befehle für die 
Tonerzeugung. Mit dem Aufkommen der Personal- und Home¬ 
computer wurde die Sprache kontinuierlich erweitert, wobei leider 
jeder Computerhersteller eigene Wege ging. So gibt es heute eine 
fast unübersehbare Menge von Sonderbefehlen, die in BASIC-Pro- 
grammen verwendet werden können, um spezielle Effekte zu er¬ 
zielen. 

Es ist unmöglich, an dieser Stelle alle Dialektvarianten, die bei den 
verschiedenen Computern Vorkommen, im einzelnen zu behan¬ 
deln. Dieses Kapitel beschränkt sich darum auf die Erklärung der 
im wesentlichen angewendeten Methoden. Grundsätzlich muß 
man dabei zwei Arten der Befehlsgebung unterscheiden. 

Da der Platzbedarf im Arbeitsspeicher heute keine große Rolle 
mehr spielt, können die Interpreter moderner BASIC-Versionen 
viel mehr Befehle verarbeiten als früher. Man hat sich darum 
bemüht, auch für die zusätzlichen Aufgaben der Grafikdarstellung 
und Tonerzeugung die Syntax der Befehle so zu gestalten, daß sie 
für den Benutzer möglichst einfach zu handhaben ist. Dies trifft auf 
ältere BASIC-Dialekte nicht zu. Durch zusätzlich eingebaute 
Hardware-Bauelemente mögliche Computerfunktionen können 
hier nicht durch BASIC-Befehle, sondern nur durch Eingriffe in die 
Maschinensprache programmiert werden. Beide Methoden werden 
hier behandelt. 
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3.1 PRINT-und POKE-Grafik 

Auch die einfachsten BASIC-Dialekte gestatten es, die Zeichen, die 
in ihrem Zeichenvorrat vorhanden sind, mit dem PRINT-Befehl an 
beliebige Stellen des Bildschirms zu setzen. Entweder gibt es hier¬ 
für einen Befehl zur Cursorpositionierung, oder es besteht die 
Möglichkeit, die Tastenkommandos zur Cursorpositionierung mit 
in das Programm einzubauen (siehe auch Abschnitt 4.6). Die erste 
Methode ist einfacher zu handhaben. Nur schwer zu verstehen sind 
oft Programme, die mit einem Computer geschrieben wurden, der 
nach der zweiten Methode arbeitet. 

Da die druckbaren Zeichen des ASCII-Code nur die Codewerte 
mit Dezimalwerten von 32 bis 127 umfassen, in einem Byte aber 
256 verschiedene Bitmuster zur Verfügung stehen, haben viele 
Computerhersteller den ASCII-Code ergänzt oder arbeiten sogar 
mit einem besonderen Bildschirmcode, in dem alle 256 Möglichkei¬ 
ten ausgenutzt werden. 

Wenn nur die Dezimalwerte von 128 bis 255 mit zusätzlichen Sym¬ 
bolen belegt werden, bleibt der ASCII-Code bestehen, und es erge¬ 
ben sich bei normalen Programmen keine Schwierigkeiten bei der 
Konvertierung. Wenn der Bildschirmcode aber wesentlich vom 
ASCII-Code abweicht, kann man die Programme nur verstehen, 
wenn man ersteren genau kennt. 

Es besteht oft die Möglichkeit, mit dem POKE-Befehl die Zeichen 
direkt in beliebige Speicherstellen des Bildschirmspeichers zu 
schreiben. Die Verwendung der PRINT-Grafik ist aber einfacher. 

Sowohl bei der PRINT- als auch bei der POKE-Grafik wird in jede 
Bildschirmposition ein Zeichen gesetzt. Die Anzahl der zu setzen¬ 
den Zeichen ist also nicht größer als im Text-Modus. Um trotzdem 
zu einer größeren Auflösung, also zu einer größeren Anzahl dar¬ 
stellbarer Punkte zu kommen, bestehen die Grafikzeichen aus 4 bis 
8 Einzelfeldern, die auch Pixel genannt werden. Wenn der Bild¬ 
schirm normalerweise die Darstellung von 1000 Zeichen zuläßt, 
können auf diese Weise 4000 bis 8000 Einzelpunkte gezeigt 
werden. 

Wird mit Pixeln gearbeitet, werden diese entweder so groß ausge¬ 
legt, daß keine Zwischenräume zwischen den Zeilen bleiben, oder 
es wird ein besonderer Grafik-Modus verwendet, bei dem die Zei¬ 
len enger zusammenrücken. In jedem Fall ist es bei der Verwen¬ 
dung von Pixeln möglich, Linien und Flächen auf dem Bildschirm 
ohne Zwischenräume darzustellen. 
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3.2 Spezielle Grafikbefehle 

Die Problematik einer grafischen Darstellung auf dem Bildschirm 
liegt in der Schwierigkeit, eine genügend hohe Auflösung in Einzel¬ 
punkte mit einem noch akzeptablen Speicherbedarf in Einklang zu 
bringen. Homecomputer haben Bildschirmspeicher mit ca. 500 bis 
1024 Byte Kapazität, während Personalcomputer dafür ca. 
2000 Byte zur Verfügung stellen. 

Wenn nur jede Bildschirmposition als Punkt betrachtet wird, ergibt 
sich eine völlig ungenügende Auflösung. Mit Hilfe der Pixel-Tech¬ 
nik kann zwar die Auflösung auf das Vier-, Sechs- oder Achtfache 
verbessert werden; aber das Einschreiben der Codewerte für die 
Pixel mit Hilfe von POKE-Befehlen ist doch recht mühsam. Viele 
BASIC-Dialekte bieten darum für höher aufgelöste Grafik beson¬ 
dere Befehle. 

Dabei kann sich die Speicherorganisation sehr unterschiedlich dar¬ 
stellen. Einige Dialekte kommen auch bei höherer Auflösung mit 
dem normalen Bildschirmspeicher aus. Bei anderen wird im 
Grafikbetrieb mehr Speicherraum benötigt, der dann durch einen 
besonderen Befehl vor der Anwendung von Grafikbefehlen reser¬ 
viert werden muß. Es gibt Computer, die dabei bis zu 12 verschie¬ 
dene Grafik-Modi zulassen, die sich bezüglich der Auflösung, der 
Farbmöglichkeiten und der Aufteilung des Bildschirms unter¬ 
scheiden. 

Am häufigsten werden die folgenden Grafikbefehle verwendet: 

GRAPHICS Aufrufbefehl für den Grafikbetrieb. Oft sind Parame- 
oder ter notwendig. Es sind jedoch auch völlig andere Be- 

GR fehlswörter wie SCREEN, PMODE, PCLEAR üb¬ 

lich. Manchmal können durch diesen Befehl mehrere 
Bildschirmspeicher reserviert werden, auf die wieder¬ 
um im Programm wahlfrei zugegriffen werden kann. 

SET Mit diesem Befehl, dem die x- und y-Koordinaten 

oder eines Bildschirmpunktes folgen müssen, wird oft ein 

PSET bestimmter Punkt gesetzt. Vielfach wird die linke 

oder obere Ecke des Bildschirms als Koordinatennull- 

PLOT punkt angenommen. Es gibt aber auch Dialekte, die 
mit einem anderen Nullpunkt arbeiten. 

DRAW Dieser Befehl dient vielfach zum Zeichnen einer 
Linie. Es müssen dann die Koordinaten der Anfangs¬ 
und Endpunkte eingesetzt werden. Manchmal wer- 
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den hierfür die Befehlswörter LINE oder PLOT ver¬ 
wendet. 


DRAWTO 

Wenn der Zeichenbefehl in dieser Form zu geben ist, 
folgt meist nur die Koordinate für den Endpunkt der 
zu ziehenden Linie. 

RESET 

löscht einen vorher gezeichneten Punkt. PRESET 
und andere Befehlswörter sind gleichfalls üblich. 

POINT 

testet, ob ein Punkt, dessen Koordinaten im Befehl 
stehen, gesetzt ist. Andere Befehlswörter kommen 
ebenfalls vor. 

HLINE 

zieht eine waagerechte Linie. 

VLINE 

zieht eine senkrechte Linie. 

CIRCLE 

zeichnet einen Kreis. Bei einigen Versionen ist zu¬ 
sätzlich das Zeichnen einer Ellipse oder eines Kreis¬ 
abschnitts möglich. 

LINE 

Durch einen Zusatz kann der Befehl zum Zeichnen 
einer Linie manchmal zum Zeichnen eines Rechtecks 
verwendet werden. 


3.3 Programmierung von besonderen 
Bildzeichen (Sprites) 

Jedes auf den Bildschirm geschriebene Zeichen wird einem Zei¬ 
chenspeicher (Zeichengenerator) im ROM entnommen, wo es 
meist in Form einer Matrix mit 8 Zeilen und 8 Spalten gespeichert 
ist. Für die Darstellung auf dem Bildschirm kann in jede Matrix¬ 
position ein Punkt gesetzt werden. Bei Einzelansteuerung der 
Punkte würde sich also eine recht hohe Auflösung für das Bild auf 
dem Schirm ergeben. 

Die meisten BASIC-Versionen erlauben aber keine direkte Einzel¬ 
ansteuerung der Bildschirmpunkte. Dafür bieten BASIC-Versio¬ 
nen, die auch für die Bilddarstellung von Spielvorgängen ausgelegt 
sind, die Möglichkeit, besondere Bildzeichen als Matrix zu pro¬ 
grammieren und diese dann auf den Bildschirm zu bringen. Man 
nennt diese Zeichen auch Sprites. Bei benutzerfreundlichen Dialek¬ 
ten gibt es hierfür besondere Befehle. Bei weniger ausgearbeiteten 
Dialekten müssen POKE-Befehle verwendet werden. 
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10 FOR K = 12a8 TO 12^.55 
20 READ A:POKE K,A:NEXT 
30 DATA 2A, 36, 2/., 126,153, 60,36,102 
AO PRINT CHR $ (BA) 


co-~jevjcoao-j'c>si«— 
C>>I CO CO »— 




Abb. 5: Zwei Methoden für die Programmierung von Bildzeichen 

Die auf dem Bildschirm dargestellten Zeichen werden intern im 
Computer als 8x8-Matrix gespeichert. Es gibt oft Methoden, eigene 
Zeichen zu programmieren, die allerdings bei den einzelnen Compu¬ 
tern sehr unterschiedlich sind. Hier zwei Beispiele: 

a. Die Belegung der einzelnen Zeilen muß als Dezimalzahl in 
bestimmte Speicherstellen des Zeichenspeichers geschrieben wer¬ 
den. Die Darstellung erfolgt durch PRINT- oder POKE-Befehle. 

b. Die Belegung der einzelnen Zeilen ist als Hexadezimalzahl in eine 
Zeichenkette zu schreiben. Diese wird mit einem Unterprogramm in 
einen bestimmten Speicherbereich geschrieben und kann von dort 
abgerufen werden 
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üblich ist es, jede Zeile der Zeichenmatrix in einem Byte darzustel¬ 
len, so daß für jedes Zeichen 8 Byte benötigt werden. Das Schema 
für diese Darstellung ist in Abb. 5 erklärt. 

Für jede Zeile der Matrix wird eine Binärzahl gespeichert, wobei 
meist die »1« bedeutet, daß dort ein Punkt zu setzen ist. Da nun 
BASIC-Programme nicht mit Binärzahlen arbeiten, müssen statt 
dessen Dezimalzahlen verwendet werden. Die Umkodierung geht 
am einfachsten mit Hilfe einer Zeichnung der Matrix. 

Den einzelnen Spalten werden, von rechts beginnend, jeweils die 
Werte der Potenzen der Zahl 2 zugewiesen, wie dies im binären 
Zahlensystem üblich ist. Dann werden die Werte der in den einzel¬ 
nen Zeilen besetzten Spalten addiert und als Zeilenwert verwendet. 
Es gibt aber auch BASIC-Dialekte, bei denen die Zeilenwerte nicht 
als Dezimalzahl, sondern hexadezimal codiert eingegeben werden 
müssen. 

Für die Speicherung der so definierten Zeichen werden mehrere 
Methoden verwendet. Einige Dialekte halten innerhalb des Zei¬ 
chengenerators bestimmte Plätze für selbstdefinierte Zeichen frei. 

Bei anderen Versionen muß vorher der ganze Zeichengenerator aus 
dem ROM in das RAM kopiert werden. Um auf diese Zeichen 
zurückgreifen zu können, muß vorher der Zeiger, der normaler¬ 
weise den Zeichensatz bedient, mit einem POKE-Befehl auf den 
neuen Zeichensatz umgebogen werden. 

Manchmal kann man im Definitionsbefehl für das Sprite eine Zahl 
wählen, unter der es dann abzurufen ist. 

Sonst gibt es für den Abruf der definierten Zeichen verschiedene 
Methoden. Sind die Sprites im Zeichengenerator abgelegt, werden 
sie mit der CHR$-Funktion bereitgestellt und können dann mit 
dem PRINT-Befehl ausgegeben werden. Als Argument muß die 
Codezahl des zum Speicherplatz gehörigen Bildschirmcode in die 
Funktion eingesetzt werden. 

Auch mit einem POKE-Befehl, der nach dem Komma die Code¬ 
zahl enthalten muß, können Sprites auf den Bildschirm gesetzt 
werden. Bewegung wird durch Einschreiben eines Sprites in eine 
Bildschirmposition und durch Einschreiben eines Leerstrings in die 
vorher besetzte Position dargestellt. 

Neuere BASIC-Dialekte, die besondere Befehle zum Setzen der 
Sprites besitzen, sind einfacher zu programmieren. Man kann dort 
die Position, in der das Zeichen erscheinen soll, als Koordinaten 
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einsetzen und dann schrittweise Änderungen zur Darstellung von 
Bewegungen programmieren. 

Es gibt BASIC-Versionen, die es erlauben, größere Sprites (zum 
Beispiel in einer 16-mal-16-Punkte-Matrix oder noch größer) zu 
definieren. Manchmal ist es auch möglich, eine Anzahl von selbst 
definierten Zeichen zu einem größeren Objekt zusammenzufügen 
und dieses dann als Ganzes zu bewegen. 

Diese kurzen Ausführungen zeigen schon, daß es sehr viele Varian¬ 
ten für die Darstellung besonderer Zeichen in den verschiedenen 
BASIC-Dialekten gibt. Es ist darum außerordentlich schwer, ein 
mit bestimmter Technik arbeitendes Programm auf eine andere 
BASIC-Version umzustellen. 

3.4 Programmierung von Figuren 
(Shapes) 

In der Grafik gut ausgebaute BASIC-Versionen bieten noch eine 
weitere Möglichkeit, größere Figuren zu programmieren und dann 
nur mit einem Befehl aufzurufen. Manchmal wird von der Einrich¬ 
tung einer SHAPE TABLE gesprochen, aber auch andere Aus¬ 
drücke finden Verwendung. 

Das Prinzip besteht darin, die Koordinaten für mehrere Zeichenbe¬ 
fehle zusammenzufassen, damit sie als Ganzes aufgerufen und zur 
Wirkung gebracht werden können. In den einzelnen BASIC-Dia¬ 
lekten werden verschiedene Programmiermethoden verwendet. 
Zwei davon sollen hier erklärt werden. 

Es gibt Dialekte, bei denen in den Zeichenbefehl DRAW ein String 
mit mehreren hintereinander stehenden Zeichenanweisungen 
gesetzt werden kann. Unabhängig vom DRAW-Befehl können 
dann die Zeichenanweisungen auch einer String-Variablen zuge¬ 
wiesen werden, so daß die ganze Figur schnell abrufbar ist. Wie das 
nach diesem Verfahren arbeitende BASIC des DRAGON-Compu- 
ters arbeitet, zeigt Abb. 6b. 

Komplizierter wird die Programmierung, wenn sie auch noch die 
Möglichkeit bietet, eine Figur in der Größe zu ändern oder rotieren 
zu lassen. Man muß dann die Zeichenanweisungen in einer Figu- 
ren-Tabelle festlegen. Flier werden wieder die verschiedensten Ver¬ 
fahren angewandt. 

Beim Colour-Genie werden zum Beispiel jeweils die Zeichenanwei¬ 
sungen für zwei Zeichenschritte als Vektoren zusammengefaßt und 
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Abb. 6: Darstellung von Figuren (Shapes) 

Für den Aufbau von Figurentafeln gibt es in den verschiedenen 
BASIC-Dialekten unterschiedliche Verfahren. Die Figur wird zwar 
immer durch hintereinander geschaltete Vektoren gezeichnet; aber 
manchmal ist die Programmierung etwas kompliziert. 
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fo 
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a. Beim Colour Genie, zum Bei¬ 
spiel. werden die Daten für zwei 
Vektoren in einem Byte gespei¬ 
chert. Nach einer Tabelle sind ein¬ 
zelne Bit zu setzen; dann ist das 
Bitmuster als Dezimalzahl einzu¬ 
geben. 
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Farbe Richtung Farbe Richtung 



U = Bewegung nach oben 
D = Bewegung nach unten 
L = Bewegung nach links 
R = Bewegung nach rechts 
E = diagonal nach oben rechts 
F = diagonal nach unten rechts 
G = diagonal nach unten links 
H = diagonal nach oben ünks 

A$ = "R1D1R2D1R1D2L1U2L1. 

DRAWA$ 


b. Bei neueren Microsoft- 
BASIC-Versionen wird ein 
Befehlsstring gebildet, in 
den verschiedene Vektoren 
nacheinander mit jeweils 
einem Kennbuchstaben 
und der Längenangabe 
eingesetzt werden 
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mit den Informationen für die Farbgebung in einem Byte abgelegt 
(Abb.6a). Sie müssen mit dem POKE-Befehl in bestimmte Spei¬ 
cherstellen geschrieben werden. Vorher ist auch noch die Anzahl 
der Byte, die für eine Figur benötigt werden, entsprechend abzu¬ 
speichern. 

Die Länge der Vektoren wird vor dem Zeichnen der ganzen Figur 
durch den Befehl SCALE n festgelegt; n bedeutet dabei die Anzahl 
der kleinstmöglichen Zeichenschritte, die in der gewählten Grafik¬ 
darstellung möglich ist. 

Zeichnen und Löschen erfolgt mit Hilfe des SHAPE- beziehungs¬ 
weise NSHAPE-Befehls, in den die Koordinaten des Punktes ein¬ 
zusetzen sind, an dem das Zeichnen der Figur beginnen soll. 


3.5 Befehle für die Farbgebung 

Obwohl vielfach die gleichen Befehlswörter verwendet werden, 
sind die Befehle, die bei den verschiedenen BASIC-Dialekten für 
die Farbausstattung bei Anschluß eines Farbfernsehers oder eines 
Farbmonitors gegeben werden können, in der Syntax sehr verschie¬ 
den. Es können darum hier nur einige Grundlagen erklärt und 
einige Beispiele vorgestellt werden. 

Grundsätzlich unterscheiden wir zwischen der Hintergrundfarhey 
in der der Bildschirm erstrahlt, wenn dort nichts dargestellt ist, und 
der Vordergrundfarbey in der eine Darstellung von Zeichen oder 
Figuren auf dem Hintergrund erscheint. Manchmal gibt es.dann 
noch eine besondere Farbe für den Bildrand, die auch Borderfarbe 
genannt wird. 

In der Anzahl der Farben und Farbtöne weichen die einzelnen 
Computer stark voneinander ab. Je mehr Farben ansteuerbar sind, 
desto mehr Speicherraum wird benötigt. Es ist darum üblich, bei 
höherer Grafikauflösung (die auch mehr Speicherraum erfordert) 
die Anzahl der Farben zu beschränken. 

Oft wird zur Speicherung der Farbinformation für die einzelnen 
Bildpunkte ein besonderer Farbspeicher unabhängig vom normalen 
Bildschirmspeicher verwendet, der für jede Bildschirmposition die 
Farbinformation aufnimmt. Bei einigen Dialekten muß man diesen 
Farbspeicher allerdings mit POKE-Befehlen programmieren. 

Bei höherer Auflösung wird der Farbspeicher manchmal mit dem 
Zeichenspeicher für die einzelnen darstellbaren Punkte verbunden. 
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Es gibt aber auch Dialekte, die mit Farbregistem arbeiten. In ihnen 
werden nur die Farbinformationen abgelegt, die dann jeweils für 
alle nachfolgenden Befehle gelten, bis eine neue Farbinformation 
erteilt wird. 

Vielfach werden die folgenden Befehlswörter verwendet, deren 
Argumente aber differieren können oder unterschiedliche Bedeu¬ 
tung haben. 

COLOR Der Grundbefehl für die Vordergrundfarbe gilt viel- 
oder fach nur im sogenannten Textmodus, also bei nicht 

COLOUR erhöhter Bildschirmauflösung, wenn mit dem 
PRINT-Befehl gearbeitet wird. Die Farben können 
ebenso im Direktbetrieb durch Betätigung spezieller 
Tasten oder Tastenkombinationen aufgerufen wer¬ 
den. Manchmal werden mit diesem Befehl auch Vor¬ 
der- und Hintergrundfarbe definiert. 

SCREEN Mit diesem Befehl werden gelegentlich Vordergrund- 
und Hintergrundfarbe sowie die Darstellungsart auf 
dem Bildschirm gewählt. 

PAINT Dieser Befehl dient zum Ausfüllen einer schon ge¬ 
zeichneten Kontur mit einer bestimmten Farbe. 

3.6 Tonerzeugung 

auf Homecomputern 

Als die Programmiersprache BASIC entwickelt wurde, hat man 
mit Sicherheit nicht daran gedacht, daß ein Computer echte Musik 
machen kann. Zwar genügen die BASIC-Grundbefehle, um jedem 
Computer einfache Tone und Geräusche zu entlocken, aber ange¬ 
nehm klingende Musik kann ein Computer nur ertönen lassen, 
wenn er entsprechende Hardware-Bauelemente besitzt. 

Einfache Töne werden erzeugt, indem die Stromzufuhr zu einem 
Lautsprecher in einem bestimmten Rhythmus geschaltet und wie¬ 
der unterbrochen wird. Dies kann ohne weiteres in BASIC-Schlei- 
fen geschehen. Wird der Strom in einer Sekunde 440mal ein- und 
ausgeschaltet, entsteht der Kammerton a. 

In viele Computer ist ein kleiner Lautsprecher eingebaut, der dann 
durch BASIC-Befehle angesprochen werden kann. Üblich sind: 

BEEP läßt einen kurzen Ton erklingen, der im Programm 
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auch als Warnsignal oder für sonstige Zwecke ver¬ 
wendet werden kann. 

KLIK Computer, die keine beweglichen Tasten besitzen, 

geben manchmal ein kurzes Tonsignal aus, wenn eine 
Tastenbetätigung vom Computer angenommen 
wurde. 

Wesentlich mehr Möglichkeiten für die Tonerzeugung eröffnen 
sich, wenn auch die Tonhöhe und die Tondauer programmiert wer¬ 
den können. Verwendet wird hierfür gelegentlich das Befehlswort 
BEEP; üblich ist aber SOUND. Manchmal ist auch ein Unterpro¬ 
gramm zur Tonerzeugung anzurufen. Leider sind die Parameter, 
die dem SOUND-Befehl folgen müssen, in den einzelnen BASIC- 
Dialekten sehr unterschiedlich angelegt. 

Zur Bestimmung der Tonhöhe sind zwei Methoden üblich. Einige 
Dialekte verlangen die Programmierung der Schwingungsdauer 
zum Beispiel in Hertz (Schwingungen pro Sekunde), während sich 
andere am System der Notenschreibung orientieren (Abb. 7). 

Muß zum Programmieren bestimmter Töne die Schwingungszahl 
in den Befehl geschrieben werden, kann man diese meist vorher 
entsprechend der gewünschten Tonart als Variable definieren. Es 
ist auch üblich, für jeden Ton ein Unterprogramm anzurufen. 

Für das zweite Verfahren muß ein der Note entsprechender Code 
in den Befehl geschrieben werden. Bei diesem Code gibt es aber 
sehr viele Variationen. Meist wird zwischen den Codewerten für 
die Töne einer Oktave und einem besonderen Wert für die Wahl 
der Oktave unterschieden. Oft verwendet man für beides Zahlen. 
Ebenfalls üblich sind Buchstaben, mit denen die Noten bezeichnet 
werden, und gewisse Grafiksymbole. 

Die Tondauer wird immer durch eine Zahl bestimmt. Manchmal 
bedeutet diese Sekunden, manchmal aber Millisekunden. Auch 
Codierungen sind üblich. Es dürfen dann Zahlen von 1 bis 255 
eingesetzt werden, und 16 bedeutet zum Beispiel eine Sekunde. In 
einigen Dialekten läßt sich die Tondauer allerdings nur in Form 
einer Schleife programmieren. 

Noch besser wird die Tonqualität, wenn auch die Lautstärke mit¬ 
programmiert werden kann. Oft gibt es hier 16 Stufen, und meist 
bedeutet 0 den leisesten Ton. 

Echte Musikerzeugung ist nur möglich, wenn der Computer mit 
einem Tongenerator ausgestattet ist. Es handelt sich hierbei um 
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Abb. 7: Verschiedene Methoden für die Programmierung von Tönen 

a. Einige Computer verwenden Befehle, die sich weitgehend an die 
Symbole der Notenschrift anlehnen. 

b. Viele neuere BASIC-Dialekte arbeiten mit Codezahlen für die ver¬ 
schiedenen Parameter zur Erzeugung eines Tons. 

c. Einige BASIC-Dialekte fordern die Eingabe der physikalischen 
Daten für die zu erzeugenden Töne 
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programmierbare hochintegrierte Bauelemente, die es erlauben, 
außer Tonhöhe, -länge und -dauer auch die physikalische Form der 
Tonschwingung zu programmieren. Hierdurch ist es möglich, die 
Klangfarbe eines Tons vorzugeben und damit zum Beispiel Orgel-, 
Flöten- und Gitarrentöne zu erzeugen. 

Da Musik meist nicht in reinen Tönen, sondern in Akkorden 
erklingt, eröffnen hochwertige Tongeneratoren die Möglichkeit, 
mehrere Tonkanäle gleichzeitig erklingen zu lassen. Erst wenn 
diese Art der Programmierung vorgesehen ist, kann man seinen 
Computer zu echter Musikerzeugung verwenden. Hierzu ist dann 
neben der Beherrschung der Tonprogrammierung des benutzten 
Computers auch profundes Wissen in der Komponiertechnik er¬ 
forderlich. 

Wesentlich weniger komfortabel gestaltet sich die Musikerzeu¬ 
gung, wenn die Tongeneratoren nicht durch BASIC-Befehle anzu¬ 
sprechen sind. Dann müssen alle Werte (meist nach komplizierter 
Berechnung) mit POKE-Befehlen eingesetzt werden. Heute gibt es 
allerdings auch für die Computer, die derartig knapp ausgebaute 
BASIC-Versionen verwenden (z. B. den Commodore C-64), ent¬ 
sprechende Hilfsprogramme, mit denen einfache Musikprogram¬ 
mierung möglich ist. 
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4. Das Laufverhalten 
verschiedener 
BASIC-Dialekte 


Zu den Testprogrammen in diesem Kapitel 

Mit den in diesem Kapitel gezeigten Testprogrammen kann 
geprüft werden, wie ein Computer bei bestimmten Befehlen 
arbeitet. Alle Testprogramme sind auf einem Genie-Computer 
mit voll ausgebautem Microsoft-BASIC geschrieben, das auch 
auf vielen anderen neuen Computern läuft. Wenn der zu 
testende Computer im Programmlauf einen Syntaxfehler meldet 
und das Programm abbricht, bedeutet dies, daß er eine Befehls¬ 
variante nicht ausführen kann. Sie können dann das Programm 
mit 

GOTO nächste Hunderter-Zeilennummer 

weiterlaufen lassen. Es erfolgt danach eine Meldung, die sagt, 
was bei der verwendeten BASIC-Version nicht erlaubt ist. Wird 
der betreffende Befehl vom Computer angenommen, erfolgt 
kein Abbruch. 

In den Testprogrammen stehende STOP-Befehle ermöglichen 
eine Beurteilung von Ergebnissen. Nach der BREAK-Meldung 
ist das Programm durch Eingabe des CONT-Kommandos fort¬ 
zusetzen. 

In einigen wenigen Fällen ist auch eine Abfrage im Direktbe¬ 
trieb notwendig, auf die dann im Programm hingewiesen wird. 

Da Anführungsstriche in Zeichenketten nicht erlaubt sind, wird 
an deren Stelle im Programm in einem auszugebenden Text 
CHR$(34) eingesetzt. 
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Die verschiedenen BASIC-Dialekte sind heute kaum noch zu zäh¬ 
len. Auch wenn die gleichen Befehlswörter verwendet werden, 
unterscheiden sie sich oft in Kleinigkeiten. Man kann aber erken¬ 
nen, daß gewisse typische Merkmale bei mehreren Versionen über¬ 
einstimmen. In diesem Kapitel werden wesentliche Unterschiede 
erklärt, die es bei den BASIC-lypen bezüglich der Befehlsanord¬ 
nung und des Laufverhaltens der Befehle gibt. 

Es geht hier weniger um die Befehle selbst, sondern um ihre Wir¬ 
kung im Programm. Da, man diese nur schwer aus einem Hand¬ 
buch ersehen kann, werden Testprogramme vorgestellt, mit denen 
jeder Computerbesitzer sein BASIC prüfen kann. Nur wer sein 
eigenes BASIC in allen Einzelheiten kennt, kann Programme in 
anderen Versionen verstehen und gegebenenfalls auf seinem Com¬ 
puter zum Laufen bringen. 


4.1 Zeilenaufbau und 
Befehlsschreibung 

Zeilennumerierung und Sprungziele 

Im Gegensatz zu den meisten anderen Programmiersprachen arbei¬ 
tet BASIC mit Zeilennummern, die vor dem Programmlauf in auf¬ 
steigender Reihenfolge sortiert werden. Dies hat den großen Vor¬ 
teil, daß der Programmierer den Ablauf des Programms einfach 
ändern kann. Auf der anderen Seite werden BASIC-Programme 
leicht unübersichlich, wenn beim Programmieren nicht streng 
modular gearbeitet wird. 

Da allgemein 2 Byte für die Speicherung der Zeilennummer als 
Binärzahl vorgesehen sind, lassen sich dort Zeilennummern von 
0 bis 65535 unterbringen. In der Praxis sieht es allerdings meist 
etwas anders aus: Die Zeile 0 ist manchmal nicht zulässig, und die 
obersten Zeilennummern können oft ebenfalls nicht verwendet 
werden. 

Kennzeichnend für die meisten Versionen ist es, daß nur im Pro¬ 
gramm verwendete Zeilennummern als Sprungziele benutzt wer¬ 
den dürfen, und daß als Zeilennummern keine Rechenausdrücke 
und damit auch keine Variablen erlaubt sind. 

Von dieser Regel gibt es aber bemerkenswerte Ausnahmen. Es exi¬ 
stieren auch BASIC-Versionen, 
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- die die Berechnung einer als Sprungziel verwendeten Zeilen¬ 
nummer gestatten, und/oder 

- bei denen als Sprungziel auch eine Wortmarke (Label) oder eine 
Variable verwendet werden kann. 

Die Möglichkeit, Sprungziele zu berechnen, die mit GOTO ange¬ 
sprungen werden sollen, findet man verhältnismäßig selten. Die 
Verwendung von Labels als Sprungziel wird in einem Normvor¬ 
schlag für ein erweitertes BASIC gefordert, ist aber heute noch 
selten verwirklicht. 


O PRINT"Zeile 0 erlaubt 

10 REM TEST 1 Zei1ennummerierung und GOTO 
100 GOTO 230 

200 PRINT"GOTO nur in besetzte Zeilen" 

210 GOTO 400*2 

300 PR INT"Keine Rechnungen in GOTO" 

310 GOTO 900 

400 PRINT"Zahl nach Rechenzeichen in GOTO 
wird nicht beachtet" 

790 GOTO 900 

800 PRINT"Rechnunqen in GOTO erlaubt" 

900 " 

910 GOTO 1010 

1000 PRINT"Kein ' statt REM erlaubt" 

1010 PRINT"REM durch ' ersetzbar" 

65512 PRINT"Letzte erlaubte Zeile 65512" 

RUN 

Zeile O erlaubt 
Zeile Tehlt in 100 
READY 
> 

>GOTO 200 

GOTO nur in besetzte Zeilen 
Zahl nach Rechenzeichen in GOTO 
wird nicht beachtet 
REM durch ' ersetzbar 
Letzte erlaubte Zeile 65512 
READY 
> 


TEST 1, Zeilennumerierung und GOTO 

Das Programm beginnt mit der Zeilennummer 0. Wenn dies nicht 
erlaubt ist, meldet der Computer einen Fehler, und das Programm 
muß mit GOTO 100 wieder gestartet werden. Dort wird geprüft, was 
geschieht, wenn der Computer einen Sprungbefehl zu einer nicht 
existierenden Zeilennummer findet. In 210 steht ein Befehl mit 
einem Rechenausdruck als Sprungziel, nach dem das Programm 
in verschiedener Weise weiterläuft oder abgebrochen wird. 
Anschließend wird getestet, ob REM durch das Hochkomma 
(Apostroph) ersetzt werden kann. Die letzte erlaubte Zeilennummer 
muß man ausprobieren. 
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Befehlsschreibung 

Normalerweise werden in BASIC die Befehlswörter und die Varia¬ 
blen mit Großbuchstaben geschrieben. Es gibt aber auch Compu¬ 
ter, wie zum Beispiel verschiedene Commodore-Modelle, bei 
denen Kleinbuchstaben für Befehle und Variable vorgeschrieben 
sind, wenn in der Betriebsart »Groß/Kleinschreibung« gearbeitet 
wird. 

Es ist gute Programmierpraxis, vor und nach Befehlswörtern eine 
Leerstelle zu lassen. Einige Versionen setzen diese selbsttätig ein 
(Sinclair), andere verlangen sie. Letzteres ist meist der Fall, wenn 
auch längere Variablennamen zugelassen sind. Die meisten Versio¬ 
nen arbeiten aber sowohl bei »gepackter« Befehlsschreibung ohne 
Leerstellen als auch bei »ungepackter« Schreibweise mit Leer¬ 
stellen. 

Bei praktisch allen Versionen ist die Eingabe des Fragezeichens 
anstelle des PRINT-Befehls erlaubt. Viele Versionen gestatten auch 
Abkürzungen für andere Befehlswörter. Manchmal sind diese auf 
den Tasten vermerkt (Sinclair); manchmal dient ein Buchstabe mit 
nachfolgendem Punkt als Abkürzung (Commodore). 


Zeilenlänge und Befehlsfolgen 

Bei allen BASIC-Versionen ist die Länge der Befehlszeilen 
begrenzt. Manchmal sind nur 80 Zeichen zulässig; die neueren Ver¬ 
sionen erlauben meist Zeilenlängen von ca. 240 bis 250 Zeichen. 
Gelegentlich gibt es auch eine Begrenzung auf eine bestimmte 
Anzahl von Bildschirmzeilen. 

Bei der Zeilenlänge ist allerdings zu berücksichtigen, daß die 
BASIC-Befehlswörter meist nicht im Klartext, sondern als Bit¬ 
muster, den Dezimalzahlen von 0 bis 255 entsprechend, gespeichert 
werden. Man nennt diese Abkürzungen TOKEN. Sie sind bei allen 
BASIC-Dialekten unterschiedlich. 

Auf alle Fälle gehören aber auch nicht auf dem Bildschirm sichtbare 
Steuerzeichen mit zu den für die Länge maßgeblichen Zeichen, wie 
zum Beispiel das Kommando für den Zeilentransport, wenn das 
Ende der Bildschirmzeile erreicht ist. 

Im allgemeinen können mehrere Befehle, getrennt durch ein 
bestimmtes Satzzeichen, in eine Befehlszeile geschrieben werden. 
Als Trennzeichen wird fast immer der Doppelpunkt verwendet. Es 
gibt aber auch BASIC-Versionen, die den rückwärts geneigten 
Strich dafür verlangen. 
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Zeichenketten müssen in Programmbefehlen immer in Anfüh¬ 
rungszeichen stehen. Viele BASIC-Versionen stellen es allerdings 
frei, das letzte Anführungszeichen in der Zeile wegzulassen. 


10 REM TEST2 Befehlsschreibung 

100 PRINT CHR*(34);" am Zeilenende unnötig 

110 GOTO 210 

200 PRINT CHR$(34);" auch am Zeilenende nötig" 
210 PRINT": als Befehlstrennung er1aubt": PRINT 
220 GOTO 310 

300 PRINT"kein : als Befehlstrennung" 

310 PRINT"aaaaaaaaaaaaaaaaaaaaaaaaaaaa 
bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb 
cccccccccccccccccccccccccccccccccccccc 
dddddddddddddddddddddddddddddddddddddd 
eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee 
ffffffffffffffffffffffffffffffffffffff 
ggggggggggggggggggggggggg 

RUN 

" am Zeilenende unnötig 
: als Befehlstrennung erlaubt 

aaaaaaaaaaaaaaaaaaaaaaaaaaaa 

bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb 

cccccccccccccccccccccccccccccccccccccc 

dddddddddddddddddddddddddddddddddddddd 

eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee 

ffffffffffffffffffffffffffffffffffffff 

ggggggggggggggggggggggggg 

READY 


TEST 2, Befehlsschreibung 

Im Test wird geprüft, ob die Anführungsstriche am Ende einer Zeile 
entfallen können und ob der Doppelpunkt zur Befehlstrennung 
zulässig ist. Die erlaubte Länge einer Befehlszeile muß man aus¬ 
probieren. Sie kann unterschiedlich sein, je nachdem, ob die Zeile 
mitten im Programm oder am Ende steht. In der Befehlszeile müs¬ 
sen durch den Computer oft auch noch Hinweise auf die nächste 
zu verarbeitende Zeile gespeichert werden. 


4.2 Variablennamen 
und Variablentypen 

Variable, eigentlich symbolischer Namen für reservierte Speicher¬ 
stellen, auf die im Programm zugegriffen werden kann, gibt es bei 
allen BASIC-Dialekten. Unterschiedlich sind allerdings die Regeln 
für die Namensgebung durch den Programmierer. 

Grundsätzlich muß der Name immer mit einem Buchstaben begin¬ 
nen. Meist können dann beliebige andere Zeichen (außer dem Zwi- 
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schenraum und den Satzzeichen) folgen. Allerdings werden viel¬ 
fach nur die ersten 2 Zeichen als Namen vom Computer ausgewer¬ 
tet. Einige Dialekte berücksichtigen dagegen längere Namen, was 
die Übersichtlichkeit der Programme erhöht, aber auch Speicher¬ 
platz kostet. 

Gelegentlich dürfen bestimmte Variable nur mit einem Buchstaben 
benannt werden (z. B. beim Sinclair). 


10 REM TEST 3 Variablennamen 
100 HANS = 7 : HAUS = 8 
110 GOTO 210 

200 PRINT"Variab1enname zu lang" 

210 PRINT "HANS =";HANS,"HAUS =";HAUS 
220 IF HAUS = HANS THEN GOTO 250 
230 PRINT"Alle Zeichen im Namen signifikant" 
240 END 

250 PR INT"HANS und HAUS nicht unterschieden" 
RUN 

HANS = 8 HAUS = 8 

HANS und HAUS nicht unterschieden 
READY 
> 


TEST 3, Variablennamen 

Das Testprogramm meldet, wenn die mit 4 Buchstaben gekenn¬ 
zeichneten Variablen nicht angenommen werden. Wenn nur die 
ersten beiden Buchstaben für den Namen signifikant sind, unter¬ 
scheiden sich die Variablennamen nicht, so daß der Inhalt von 
HANS gleich dem von HAUS ist. 


Definition von Variablentypen 

Alle voll ausgebauten BASIC-Dialekte kennen mindestens 
3 Typen: 

- Integervariable (Ganzzahlen), gekennzeichnet durch % 

- Variable für Fließkommazahlen, ohne Kennzeichen oder mit ! 

- Zeichenkettenvariable, gekennzeichnet durch $. 

Bei einigen Versionen gibt es dann noch zusätzlich 

- Zahlenvariable mit doppelter Genauigkeit, Kennzeichen #. 

Im allgemeinen muß das Variablenkennzeichen dem Namen 
unmittelbar folgen; ganz selten steht es vor dem Namen (z. B. beim 
ACORN ATOM). 

Der Zahlenbereich, in dem Ganzzahlen verarbeitet werden kön¬ 
nen, liegt bei den meisten Computern zwischen —32768 und 
+32767. 
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Viele neuere Dialekte kennen besondere Definitionsbefehle, mit 
denen bestimmte Anfangsbuchstaben des Namens für einen Varia¬ 
blentyp reserviert werden können. Im weiteren Verlauf des Pro¬ 
gramms braucht dann das Typenkennzeichen bei diesen Variablen 
nicht angefügt zu werden. Bei der Definierung eines Typs einer 
Variablen gilt dieser meist für alle Zahlenvariablen, deren Name 
mit dem betreffenden Buchstaben anfängt, nicht jedoch für Zei¬ 
chenkettenvariable, auch mit dem gleichen Buchstaben. Durch 
Anfügung eines Typenkennzeichens an einen Variablennamen 
kann meist die Definition wieder aufgehoben werden. 


10 REM TEST 4 De-finition von Vari ablent vpen 
60 DEFINT A: PRINT"A als Integer definiert" 

90 GOTO 120 

100 PRINT"Keine Variablendefinierung möglich" 
110 END 

120 PRINT"LET A = 12324.56": A=12343.56 
130 PRINT"1234.56 wird zu " ; A 

200 PRINT"Variable A kann nur Integer aufnehmen 
300 Al = 12.34 

310 PRINT"Alle Zahlenvariablen mit dem gleichen 
Anfangsbuchstaben sind Integervariable 
320 PRINT"A1=12.34 wird zu ";A1 
330 A$="HUMBOLDT" 

340 PRINT"A$ = ";A1i 

350 PRINT"A und A* sind verschieden" 

360 END 

400 PRINT"Definierung gilt für alle Variablen“ 
RUN 

A als Integer definiert 
LET A = 12324.56 
1234.56 wird zu 12343 

Variable A kann nur Integer aufnehmen 

Alle Zahlenvariablen mit dem gleichen 

Anfangsbuchstaben sind Integervariable 

Al=12.34 wird zu 12 

AS = HUMBOLDT 

A und AS sind verschieden 

READY 


TEST 4, Definition von Variablentypen 

Dieser Test ist nur sinnvoll, wenn der Computer die Definierung 
von Variablentypen erlaubt. Er untersucht, für welche Variablen¬ 
namen eine Definierung jeweils gilt. 


Erlaubte Länge von Zeichenketten 

Die maximale Anzahl von Zeichen, die in einer Zeichenkette 
gespeichert werden können, ist unterschiedlich. Einige Dialekte 
erlauben nur ca. 80 Zeichen, während andere bis etwa 255 Zeichen 
zulassen. 
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Bei Zeichenketten wird oft der Inhalt in einem besonderen Zei¬ 
chenspeicher getrennt von den Informationen über Namen und 
Länge gespeichert. 

Für die Speicherung selbst sind drei Verfahren üblich: 

1. Bei den BASIC-Versionen, die auf dem Mikroprozessor 6502 
oder ähnlichen Typen laufen (z. B. Commodore, Apple), ist 
keine Vorbereitung für die Speicherung von Zeichenketten not¬ 
wendig. 

2. Bei vielen Versionen, die einen Z 80 als Zentraleinheit verwen¬ 
den, muß der oberste Teil des RAM mit dem CLEAR-Befehl 
und nachfolgender Zahl als Zeichenspeicher reserviert werden 
(z. B. TRS 80 und Genie). 

3. Es gibt auch BASIC-Dialekte, die Zeichenketten als eindimen¬ 
sionale Felder speichern. Bei ihnen muß die Länge jedes im Pro¬ 
gramm verwendeten Strings vorher mit dem DIM-Befehl festge¬ 
legt werden (z. B. Sinclair und Hewlett-Packard). 

Der Vorteil der Zeichenkettenspeicherung bei den ersten beiden 
Verfahren (der darin liegt, daß die Länge der Ketten während des 
Programms im Rahmen der erlaubten Maximallänge auch beliebig 


10 REM TEST 5 Strinqlänge 
100 At = "X" 

110 FÜR K = 1 TO 100 
120 Bi = 

130 NEXT: GOTO 220 

200 PRINT"Reservierung mit CLEAR notwendig" 
210 CLEAR 1000: A* = "X" 

220 FOR K = 1 TO 300 
230 B$ = 

240 NEXT 

300 PRINT"Erlaubte Stringlänge =";LEN(B*) 
RUN 

Zuwenig Textspeicher in 120 
READY 

> 

>60T0 200 

Reservierung mit CLEAR notwendig 
Text< zu lang in 230 
READY 
> 

>G0T0 300 

Erlaubte Stringlänge = 255 
READY 


TEST 5, Stringlänge 

Das Programm untersucht, ob eine Reservierung für die Zeichen¬ 
speicherung notwendig ist und wie lang dann Zeichenketten 
äußerstenfalls sein dürfen. 
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erweitert werden kann) muß durch die gelegentlich notwendige 
Aufräumung des Speichers erkauft werden. 

Mit dem englischen Wort GARBAGE COLLECTION wird eine 
Neuordnung des Zeichenspeichers bezeichnet, die der Computer 
gelegentlich mitten im Programmlauf durchführt, wenn er keinen 
Platz mehr im Zeichenspeicher findet. Erst bei diesem Vorgang, der 
einige Sekunden dauern kann, werden die nicht mehr aktuellen 
Daten dort gelöscht; denn bei jeder neuen Speicherung einer auch 
schon vorher verwendeten String-Variablen wird neuer Platz im 
Zeichenspeicher belegt. 

Ein Speicheraufräumen ist bei dem dritten Verfahren nicht notwen¬ 
dig. Dafür ergibt sich der Nachteil, daß im Programmlauf nur 
Zeichenketten bis zur dimensionierten Länge gespeichert werden 
können. 


Speicherbedarf für Variable 


Ganzzahl 

1. Byte des Namens (neg.) 

2. Byte des Namens (neg.) 
Oberes Byte der Zahl 
Unteres Byte der Zahl 
Nullen 



Fließkommazahl 

1. Byte des Namens (pos.) 

2. Byte des Namens (pos.) 
Exponent 

oberes Byte der Mantisse 
Weiteres Byte der Mantisse 
Weiteres Byte der Mantisse 
Unteres Byte der Mantisse 



Zeichenkette 

1. Byte des Namens (neg.) 

2. Byte des Namens (pos.) 
Länge der Kette 
Unteres Byte des Zeigers 
Oberes Byte des Zeigers 
Nullen 



Abb. 8: Aufbau der Variablenspeicher bei Apple und Commodore 

Grundsätzlich werden für alle Variablentypen immer 7 Byte bean¬ 
sprucht und die nicht benötigten Byte mit Nullen aufgefüllt. Den Typ 
der gespeicherten Variablen erkennt der Computer an der Art, wie 
die zwei Zeichen des Namens gespeichert sind 
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Variable werden bei den verschiedenen BASIC-Versionen unter¬ 
schiedlich gespeichert. Normalerweise braucht sich der Program¬ 
mierer hierum nicht zu kümmern. Wenn man den Speicherbedarf 
für einen Programmlauf schätzen will, muß man aber doch wissen, 
wie viele Byte jeweils für die Speicherung einer Variablen benötigt 
werden. 


Ganzzahl 

Kennung für Ganzzahl 
2. Zeichen des Namens 
1. Zeichen des Namens 
Unteres Byte der Ganzzahl 
Oberes Byte der Ganzzahl 


Fließkommazahl 
Kennung für Fließkommazahl 
2. Zeichen des Namens 
1. Zeichen des Namens 
Unteres Byte der Mantisse 
Mittleres Byte der Mantisse 
Oberes Byte der Mantisse 
Exponent 


I 



Zahl mit doppelter Genauigkeit 
Kennung für doppelte Genauigkeit 
2. Zeichen des Namens 
1. Zeichen des Namens 
Unteres Byte der Mantisse 
Weitere Byte der Mantisse 
Exponent 



Zeichenkette 
Kennung für Zeichenkette 
2. Zeichen des Namens 
1. Zeichen des Namens 
Länge der Kette 
Unteres Byte des Zeigers 
Oberes Byte des Zeigers 



Abb. 9: Aufbau der Variablenspeicher beim TRS 80 und Genie 

Für die verschiedenen Variabientypen wird unterschiedlicher Spei¬ 
cherraum verwendet Der Typ ist an der als erstes gespeicherten 
Typenziffer zu erkennen 
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Neben dem eigentlichen Inhalt der Variablen muß auch immer der 
Variablenname und ein Hinweis auf den Variablentyp mitgespei¬ 
chert werden. Hierfür gibt es recht unterschiedliche Verfahren bei 
den BASIC-Dialekten. Sie sollen hier nicht alle im einzelnen erklärt 
werden, da sie für das Verständnis fremder Programme nicht 
wesentlich sind. Zwei verbreitete Verfahren sind in den Abb. 8 
und 9 dargestellt. 


10 REM TEST 6 Spei cherbedar-f -für Variable 

90 V2=0: V3=0: V4=0: V5=0 

100 VI = MEM 

110 A7. = 1000 

120 V2 = MEM 

130 PRINT"Inteqervar. brauchtVI—V2;"Byte 
140 B! = 123.45 
150 V3 = MEM 

160 PRINT"G1eitkommav. braucht";V2-V3j"Byte" 

170 C$="HUMBOLDT" 

180 V4 = MEM 

190 PRINT"Stringvar, braucht";V3-V45"Byte" 

200 PRINT" zuzüglich 1 Byte -für jedes Zeichen" 
210 D# = 1234567.89 
220 V5 = MEM 

230 PRINT"Doppeltgenaue V. braucht"jV4-V5;"Byte" 
RUN 

Integervar. braucht 5 Byte 
Gl eitkommav. braucht 7 Byte 
Stringvar, braucht 6 Byte 
zuzüglich 1 Byte -für jedes Zeichen 
Doppeltgenaue V. braucht 11 Byte 
READY 


TEST 6, Speicherbedarf für Variable 

Im Programm wird der Befehl MEM verwendet, der die Anzahl der 
noch freien Speicherplätze zur Verfügung stellt. Bel einigen Dia¬ 
lekten kann er auch FRE (0) oder anders lauten. Der Wert von MEM 
wird jeweils vor und nach einer neuen Variablenzuweisung einer 
Hilfsvariablen (V1 bis V5) zugewiesen, damit die Differenz berech¬ 
net werden kann. Den verwendeten Hilfsvariablen muß vorher der 
Wert 0 gegeben werden, damit ihr Speicherbedarf nicht in die 
Rechnung eingeht. 


Felddimensionen 

Außer einfachen Variablen können in BASIC auch Feldvariabley 
manchmal auch Bereichsvariable genannt, verwendet werden. Bei 
ihnen kann der Variablenname jeweils noch durch eine oder meh¬ 
rere Indexziffern ergänzt werden. Es gibt Dialekte (z. B. Sinclair), 
bei denen die Feldnamen nur aus einem Buchstaben bestehen dür¬ 
fen. Meist sind aber auch zwei Zeichen zulässig. 
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Felder müssen immer vor der Verwendung mit dem DIM-Befehl 
dimensioniert werden. Sehr viele BASIC-Dialekte gestatten aber 
die Benutzung eindimensionaler Felder ohne vorherige Dimensio¬ 
nierung, wenn nur die Indexziffern 0 bis 10 Verwendung finden. 
Bei einigen Versionen kann mit OPTION BASE bestimmt wer¬ 
den, ob das erste Feldelement den Index 0 oder 1 erhält. 

Die Anzahl der Feldelemente, also der Indexziffern, ist meist nicht 
beschränkt, sondern nur von der Größe des Arbeitsspeichers ab¬ 
hängig. 

Unzulässig ist bei den meisten BASIC-Dialekten das Ansprechen 
der DIM-Befehle oder deren Änderung im weiteren Programm¬ 
lauf. Bei einigen Dialekten gibt es aber hierfür den Befehl ERASE, 
mit dem alle Dimensionierungen oder die Dimensionierungen in 
einer bestimmten Zeile aufgehoben werden können. 


10 REM TEST 7 Felddimensionierung 

100 X=MEM: PRINT X;"Vor Dimensionierung" 

110 DIM A(80,100) 

120 Y=MEM: PRINT Y;"Nach Dimensionierung" 
140 PRINT"Zahlenfeld mit 8000 Elementen" 
150 PRINT"benötigt";X-Y;"Speicherplätze" 
160 DIM 8(10) 

170 PRINT MEM 
180 DIM B(20) 

170 END 

200 PR INT "Ander Ling einer Dimensionierung" 
210 PRINT" ist verboten" 

RUN 

36654 Vor Dimensionierung 
3913 Nach Dimensionierung 
Zahlenfeld mit 8000 Elementen 
benötigt 32741 Speicherplätze 
3865 

Neue Felddimension in 180 
READY 

GOTO 200 

Änderung einer Dimensionierung 
ist verboten 

READY 


TEST 7, Felddimensionierung 

Im Programm wird ein zweidimensionales Feld mit 80 Spalten und 
100 Zeilen dimensioniert, was ca. 32 KByte Speicherraum erfor¬ 
dert. Eine Redimensionierung eines schon dimensionierten Feldes 
ist In der verwendeten BASIC-Verslon nicht zulässig. 
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Wertzuweisung an Variable 

Bei fast allen BASIC-Versionen kann die Wertzuweisung auch 
allein durch das Gleichheitszeichen erfolgen. Nur wenige Dialekte 
(z. B. Sinclair) fordern das Befehlswort LET. 

Unterschiede gibt es allerdings bei der Behandlung leerer Variablen 
im Programm. Bei einigen Dialekten muß einer Variablen, ehe sie 
in einem Rechenausdruck oder PRINT-Befehl verwendet wird, ein 
Wert (der auch 0 sein kann) zugewiesen werden. Neuere Versionen 
verlangen dies nicht mehr. Einer leeren Zahlenvariablen wird auto¬ 
matisch der Wert 0 zugewiesen, während eine leere Zeichenketten¬ 
variable oft ignoriert wird. 


iO REM TEST 8 Leere Variable 
100 PRINT A 

110 PRINT"Bei leerer Zahlenvariablen wird" 

120 PRINT ASC(STR$(A));"als Code einaesetzt" 
130 GOTO 230 

200 PRINT"Variable darf nicht ohne vorherige" 
210 PRINT"Zuweisung verwendet werden" 

220 END 
230 PRINT A$ 

240 PRINT"Bei leerer Stringvariablen wird" 

250 PRINT ASC(A*);"als Code eingesetzt" 

260 END 

3<.')0 PRINT"Kein abfragbarer Code eingesetzt" 
RUN 

Bei leerer Zahlenvariablen wird 
32 als Code eingesetzt 

Bei leerer Stringvariablen wird 
Unerlaubter Funktionsaufruf in 250 
READY 

'GOTO 300 

Kein abfragbarer Code eingesetzt 
READY 


TEST 8, leere Variable 

Das Programm untersucht, was geschieht, wenn eine Variable im 
Programm verwendet wird, ohne daß ihr vorher ein Wert zugewie¬ 
sen wurde. 


Bei den meisten BASIC-Dialekten muß jede Wertzuweisung an 
eine Variable einzeln programmiert werden. Nur wenige Versionen 
erlauben Mehrfachzuweisungen in einem Befehl. 
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10 REM TEST 9 MehrTachzuweisunqen 
100 A=B=10 

110 IF B=10 THEN 300 
120 PRINT"A =";A:"B =";B 

200 PRINT"Mehrfachzuweisunqen unzulässig 
210 END 

300 PRINT"Mehr-fachzuwei sungen zulässig 
RUN 

A = 0 B = O 

Mehrfachzuweisungen unzulässig 
READY 


TEST 9, Mehrfachzuweisungen 

Dieser Test zeigt, daß bei dem verwendeten BASIC Mehrfachzuwei¬ 
sungen zwar nicht zulässig sind, aber doch nicht zum Programm¬ 
abbruch führen. 

4.3 Zahlenverarbeitung 

Im Programm zu verwendende Zahlen werden in BASIC immer als 
Dezimalzahlen eingegeben und auch in gleicher Weise vom Pro¬ 
gramm ausgegeben. Da die Zahlen intern aber binär verarbeitet und 
gespeichert werden, ist nach jeder Eingabe und vor jeder Ausgabe 
eine Umrechnung notwendig, die BASIC selbsttätig durchführt. 
Einige sich dabei ergebende Besonderheiten können bei den ver¬ 
schiedenen BASIC-Dialekten zu unterschiedlichen Wirkungen 
führen. 

Zunächst gibt es schon verschiedenes Verhalten bei der Zahlenein¬ 
gabe und Interpretierung. Benutzerfreundliche Versionen ignorie¬ 
ren alle Leerstellen innerhalb einer Ziffernfolge und ziehen diese zu 
einer Zahl zusammen. 


10 REM TEST 10 Leerstellen in Zahlen 
100 A = 2 34: PRINT”A =2 34” 

110 IF A=234 THEN PRINT A: GOTO 140 
120 PRINT"Leerstel1en innerhalb von" 
130 PRINT”Zahlen nicht erlaubt”: END 
140 PRINT”Leerstel1en innerhalb von 
150 PRINT"Zahlen werden ignoriert” 

RUN 

A = 2 3 4 

234 

Leerstellen innerhalb von 
Zahlen werden ignoriert 
READY 


I TEST10, Leerstellen in Zahlen 

Der Test zeigt, ob mehrere durch Leerstellen getrennte Ziffern zu 
einer Zahl zusammengezogen werden. 
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Zahlen werden in allen BASIC-Dialekten nur mit einer beschränk¬ 
ten Ziffernzahl (Stellenzahl) verarbeitet und ausgegeben. Hierbei 
sind zwei Arbeitsweisen üblich: 

-Viele BASIC-Versionen arbeiten intern mit bis zu 32stelligen 
Binärzahlen. Ausgegeben werden dann meist Dezimalzahlen mit 
9 Stellen mit Rundung aus der 10. Stelle. 

- Neuere BASIC-Versionen verarbeiten Fließkommazahlen in 
zwei Genauigkeiten. Bei einfacher Genauigkeit werden 6 Stellen 
mit Rundung aus der 7. Stelle ausgegeben, während bei doppel¬ 
ter Genauigkeit 15 Dezimalstellen genau gerechnet werden. 
Wenn mit doppelter Genauigkeit gearbeitet werden soll, müssen 
die verwendeten Variablen mit dem Doppelkreuz (#) gekenn¬ 
zeichnet oder vorher als doppelt genau definiert werden. 

Müssen Zahlen verarbeitet werden, die kleiner oder größer sind, als 
auf diese Weise darstellbar, wird zur Exponentialdarstellung (wis¬ 
senschaftliche Notation) übergegangen. 


10 REM TEST 

11 Zahlendarstellung 

90 A=123456: 

A#=123456 

100 FOR K = ( 

0 Tü 13 

110 PRINT A* 
120 NEXT 

lOÄK. A#* lOÄK 

123456 

123456 

1.23456E+06 

1234560.117736816 

1.23456E+07 

12345600.94189453 

1.23456E+08 

123456007.5351563 

1.23456E+09 

1234560120.5625 

1.23456E-H0 

12345601929 

1.23456E+11 

123456023148 

1.23456E+12 

1234559629632 

1.23456E+13 

12345608888832 

1.23456E-»-14 

123455968395264 

1.23456E+15 

1234560379256832 

1.23456E+16 

1.23455916563497D+16 

1.23456E+17 

1.234560399483863D+17 

1.23456E+ia 

READY 

1.234561014385607D+18 


TEST 11, Zahlendarstellung 

Der Test zeigt, wann der Übergang zur Exponentialdarstellung 
geschieht. Man erkennt auch, wie hier die Rundung aus der 
7. Stelle erfolgt. Wenn die verwendete BASIC-Version kein Rech¬ 
nen mit doppelter Genauigkeit kennt, müssen die betreffenden 
Befehle weggelassen werden. 
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Schon bei diesem Test zeigt sich, daß die bei dem verwendeten 
BASIC benutzten Algorithmen zum Rechnen und zur Zahlen¬ 
wandlung bei großen Zahlen nicht korrekt arbeiten. Dies ist ein 
Übel, das sehr viele BASIC-Dialekte aufweisen. Es kommt hinzu, 
daß das Laufverhalten nur sehr schwer vorauszusagen ist, wenn 
mehrere Rechnungen und Wandlungen hintereinander folgen. 
Einige neue BASIC-Versionen rechnen darum intern nicht mehr 
mit reinen Binärzahlen, sondern im BCD-System (Binary Coded 
Decimal), was immer genaue Rechnung ergibt. 


10 REM TEST 1 

2 Genauiakeit 

90 A=100000: 

A#=10000Ö 

100 FOR K = 0 

TO 12 

110 PRINT AI 
120 NEXT 

lOÄK, A#t lOAH 

RUN 

l00000 

100000 

lE+06 

1000000.095367432 

lE+07 

10000000.76293945 

lE+08 

100000006.1035156 

lE+09 

1000000097.65625 

lE + 10 

10000001562.5 

lE+1 1 

100000018750 

lE+12 

999999700000 

lE+13 

10000007200000 

lE+14 

99999974400000 

lE+15 

1000000307200000 

9.99999E+15 

9999993241600000 

lE+17 

READY 

1.000000323584D+17 


TEST 12, Genauigkeit 

Dieser Test, dessen Ergebnisse leicht nachzurechnen sind, deckt 
erstaunliche Fehler auch bei doppeltgenauer Rechnung auf. Ver¬ 
schiedene BASIC-Versionen laufen hier anders. 


Die meisten Rechenalgorithmen enthalten auch Anweisung für die 
Rundung, da meist mit mehr Stellen gerechnet wird, als angezeigt 
werden. Dadurch bleiben Rechenergebnisse, soweit sie nicht in die 
Nähe von Null kommen, doch ausreichend zuverlässig. 
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10 REM TEST 13 Rundung 


90 A=2: E=3 

100 FOR K = 1 TO 
110 A=A»K 

120 B=A/3; C=B»3 
130 PRINT A,B.C 
140 NEXT 

200 STEP 20 


150 STOP 

200 FOR K = 1 TO 
210 E=E*K 

10 


220 F=E/3+K: G=(F-K)»3 


230 PRINT E,F.G 
240 NEXT 



RUN 



2 

.666667 

2 

42 

14 

42 

1722 

574 

1722 

105042 

35014 

105042 

a.50B4E+06 

2.a3613E+06 

8.5084E-I-06 

8-59349E+0a 

2.8645E+08 

8.59349E+08 

1.03981E+11 

3.46604E+10 

1.039aiE-»-ll 

1.46613E+13 

4.88712E+12 

1.46613E+13 

2.36048E+15 

7.B6826E+14 

2.36048E+15 

4.27246E+17 
Break in 150 
READY 

> 

1.42415E+17 

4.27246E+17 

CONT 



3 

2 

3 

6 

4 

6 

18 

9 

18 

72 

28 

72 

360 

125 

360 

2160 

726 

2160 

15120 

5047 

15120 

120960 

40328 

120960 

1.08864E+06 

362889 

1.08864E+06 

1.08864E+07 
READY 
> 

3.62881E+06 

1.08a64E-*-07 


TEST 13, Rundung 

Ob die Rundung bei entgegengesetzten Rechenverfahren immer in 
gleicher Weise arbeitet, kann mit diesem Test geprüft werden. Es 
werden Zahlen zunächst geteilt; dann wird das Ergebnis mit dem 
Divisor wieder multipliziert. Wenn die Rundung richtig arbeitet, 
müssen die ursprüngliche Zahl und das Ergebnis der Multiplika¬ 
tion übereinstimmen. 

Im zweiten Teil wird geprüft, ob eine kleine Veränderung des Quo¬ 
tienten durch Addition einer Zahl ebenso durch Subtraktion der 
gleichen Zahl vor der Division richtig ausgeführt wird. 


Rundungs- oder, besser gesagt, Rechenfehler gibt es aber meist bei 
sehr kleinen Zahlen. Diese Fehler können dazu führen, daß Ver¬ 
gleiche als falsch erkannt werden, auch wenn rechnerisch ein wah¬ 
res Vergleichsergebnis vorliegt. 
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10 REM TEST 14 Rundunasteh1 er 
90 A=l: B=.5: C=.8: D=.2 

100 A=A-B: C=C-D 

110 PRINT A,C,CDBL(C) 

120 IF C= -.8 THEN 180 

140 IF C< -.8 THEN 200 

150 GOTO 100 


180 PR INT"Zahl engl eichheit bei 

-.8 erkannt: END 

200 PRINT"Zahl engl eichhei t bei 

—.8 nicht erkannt 

RUN 

.5 .6 

.6000000238418579 

0 .4 

.4000000357627869 

-.5 .2 

.2000000327825546 

-1 2.98023E-08 

2.98023223876953lD-08 

-1.5 -.2 

-.1999999731779099 

-2 4 

-.3999999761581421 

-2.5 -.6 

-.5999999642372131 

-3 -.8 

-.7999999523162842 

-3.5 -1 

-.9999999403953552 

Zahlengleichheit bei -.8 nicht 
READY 

erkannt 


TEST 14, Rundungsfehler 

Dieser Test zeigt, wann der Nulldurchgang noch erkannt wird, 
wenn von der Ausgangszahl in jedem Schleifenlauf kleine Zahlen 
abgezogen werden. Mit der Funktion CDBL wird das Rechenergeb¬ 
nis in doppelte Genauigkeit gewandelt, wodurch man erkennt, wel¬ 
ches interne Rechenergebnis entstanden ist. 

Die nur mit einem Gleichheitszeichen formulierte Bedingung wird 
nicht als wahr erkannt, da der beim Nulldurchgang entstandene 
Fehler immer weiter mitgeschleppt wird. 


Die Wandlung von einer Genauigkeitsdarstellung in die andere 
funktioniert nicht immer so, wie im Testbeispiel gezeigt. 


10 REM TEST 15 Doppelt genau 
100 A!=123/456 

110 PRINT" 123/456 ein-fach gerechnet"? A ! 

120 B# =123/456 

130 FRINT"doppelt genau gerechnetB# 

140 PRINT"in dopp.genau gewandelt";CDBL(A!) 
150 PRINT"in eint.genau zurück";CSNG(B#) 

RUN 

123/456 eintach gerechnet .269737 
doppelt genau gerechnet .2697368562221527 
in dopp.genau gewandelt .2697368562221527 
in eint.genau zurück .269737 
READY 


TEST 15, Doppelt genau 

In diesem Test *wird untersucht, ob es möglich ist, das Ergebnis 
einer einfach genauen Rechnung in doppelte Genauigkeit zu wan¬ 
deln, bzw. umgekehrt. 
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Die in diesem Kapitel erklärten Tests zeigen, daß man bei einigen 
BASIC-Versionen den mit vielen Stellen ausgegebenen Rechen¬ 
ergebnissen nicht unbedingt trauen kann. Es ist darum zu empfeh¬ 
len, Rechnungen gegebenenfalls mit einfachen, leicht nachprüfba¬ 
ren Zahlen auszuprobieren. 


4.4 Wirkung der Funktionen 

Die Wirkungsweise der Funktionsbefehle ist mit wenigen Ausnah¬ 
men in allen BASIC-Versionen gleich. Da die einzelnen Dialekte 
aber zum Teil verschiedene Algorithmen zur Berechnung der 
Funktionswerte verwenden, können schon Unterschiede bei den 
Ergebnissen auftreten. 


Winkel- und Rechenfunktionen 

Nur wenige BASIC-Dialekte bieten dem Benutzer die Wahl, ob er 
den Winkel in Grad oder als Radiant einsetzen will. Im allgemeinen 
muß der Winkel im Bogenmaß in das Argument der Funktion 
geschrieben werden. 

Nur in wenigen BASIC-Dialekten sind alle bekannten Winkel¬ 
funktionen verfügbar. Immer besteht jedoch die Möglichkeit, nicht 


10 REM TEST 16 Sinus/Cosinus 

90 PI=3.14159 

100 FOR K 

= 0 TO 90 STEP 10 

110 G = K*2»PI/360 

120 PRINT 
130 NEXT 

SIN(G).CÜS(G) 

RUN 


0 

1 

.173648 

.984808 

.34202 

.939693 

.5 

.866026 

.642787 

.766045 

.766044 

.642788 

.866025 

.500001 

.939692 

.342021 

.984808 

.173649 

1 

1.12352E-06 

READY 



TEST 16, Sinus/Cosinus 

Der Test soll zeigen, bei welchen Winkeln der verwendete Rechen¬ 
algorithmus ungenaue Ergebnisse liefert. Es ist zweckmäßig, die¬ 
sen Test auch mit der Schrittweite 1 in Zeile 100 laufen zu lassen. 
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vorhandene Winkelfunktionen durch Näherungsformeln zu be¬ 
rechnen. 

Ungenauigkeiten treten bei vielen BASIC-Dialekten auf, wenn der 
Funktionswert sehr klein wird. 

Ähnliche Ungenauigkeiten passieren bei anderen Funktionen, 
deren Ergebnis auf einer Reihenbildung beruht. 


Zufallszahlen 

Große Unterschiede gibt es bei der Funktion RND zur Erzeugung 
von Zufallszahlen. In den meisten Dialekten werden nur Zahlen 
zwischen 0 und 1 erzeugt; die Art der Zahlenfolge kann aber unter¬ 
schiedlich sein, je nachdem, ob als Argumente 0, eine positive oder 
eine negative Zahl eingesetzt wird. 

Nur wenige BASIC-Dialekte erlauben die Erzeugung größerer 
ganzzahliger Zufallszahlen ohne zusätzlichen Rechenvorgang. 
Beim TRS 80 und beim Genie werden, wenn eine Ganzzahl als 
Argument eingesetzt wird, Zufallszahlen zwischen 1 und dieser 
Zahl gebildet. 

Eine Reihe von Computern erzeugt immer die gleiche Folge von 
Zufallszahlen. Es gibt dann aber besondere Befehle, mit denen der 
Zufallsgenerator vor jedem Programmlauf auf einen anderen 


10 REM TEST 17 Zufallszahlen 

20 ÜN ERROR GOTO 200 

100 FÜR K = 1 TO 10 

110 PRINT RND(O),RND(5),RND(-1) 
120 NEXT 

200 RESUME 120 



RUN 

.903326 

4 

.349111 

2 

.286094 

3 

.872227 

4 

.671405 

2 

.906889 

2 

.476437 

3 

.197911 

1 

.504106 

5 

m 5vJ55o4 

3 


TEST 17, Zufallszahlen 

Das Programm prüft, was geschieht, wenn verschiedene Argu¬ 
mente in die RND-Funktion gesetzt werden. Da das Testprogramm 
auf einem Genie-Computer lief und dieser negative Zahlen als 
Argument nicht annimmt, enthält es eine Fehlerbehandlungsrou¬ 
tine. Sie verhindert den Programmabbruch, wenn ein Syntaxfehler 
(RND mit negativem Argument) gefunden wird. Zeile 20 und 
Zeile 200 können bei anderen Computern entfallen. 
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Anfangswert gesetzt werden kann. Die Befehlswörter RANDOM 
oder RANDOMIZE sind hierfür üblich. Bei Computern, die eine 
immer mitlaufende Uhr besitzen (z. B. Commodore), kann auch 
die Uhrzeit als Anfangswert verwendet werden, wodurch sich 
unterschiedliche Folgen von Zahlen ergeben. 

Wenn dieser Test mehrfach durchgeführt wird, ist auch gut zu 
erkennen, ob immer die gleiche Folge von Zufallszahlen läuft. 


Zeichenkettenfunktionen 

Auch die Zeichenkettenfunktionen arbeiten in allen BASIC-Dia- 
lekten im wesentlichen gleich, nur sind nicht immer alle verfügbar. 

Einen wesentlichen Unterschied gibt es lediglich bei der STR$- 
Funktion zur Wandlung einer Zahl in eine Zeichenkette. In ver¬ 
schiedenen Dialekten wird bei der Wandlung einer positiven Zahl 
in eine Kette immer eine Leerstelle als erstes Zeichen in die Zei¬ 
chenkettenvariable gesetzt. Dies muß gegebenenfalls bei Verglei¬ 
chen mitberücksichtigt werden. 


10 REM TEST 18 Funktionen STR» und VAL 
90 PRINT"A=+5 und B»=STR»(A)" 

100 A=+5: B»=STR$(A) 

110 PRINT-Länqe von B»=":LEN(B»);"Bvte 
120 PRINT"l.Bvte hat ASCII-Wert";ASC(B») 

130 PRINT"2.Bvte hat ASCII-WertASC(RIGHT»(B»,1)) 
140 PRINT"Bei VAL(B»)=5 wird gemeldet 
150 IF VAL(B»)=5 THEN PRINT "WAHR": GOTO 200 
160 PRINT"FALSCH" 

200 PRINT"Bei STR»(A)=";CHR»(34);"5";CHR»(34); 
"wird gemeldet 

210 IF STR»(A)="5" THEN PRINT"WAHR": END 
220 PRINT"FALSCH" 

RUN 

A=+5 und B»=STR»(A) 

Länge von B»= 2 Bvte 

1. Bvte hat ASCII-Wert 32 

2. Bvte hat ASCII-Wert 53 
Bei VAL(B»)=5 wird gemeldet 
WAHR 

Bei STR»(A)="5"wird gemeldet 

FALSCH 

READY 


TEST 18, Funktionen STR$ und VAL 

Der Test zeigt, ob bei der Wandlung einer Zahl in eine Zeichenkette 
nur die Zahl oder vorweg noch ein anderes Zeichen in die String- 
Variable gesetzt wird. Der Test offenbart auch, wie Vergleiche 
behandelt werden. 
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Sonstige Funktionen 

In dieser Gruppe ist die Syntax für die Anwendung der TAB- 
Funktion gelegentlich unterschiedlich. Auch BASIC-Dialekte, die 
Leerstellen grundsätzlich tolerieren, verlangen oft, daß zwischen 
dem Befehlswort TAB und der öffnenden Klammer für das Argu¬ 
ment kein Zwischenraum stehen darf. Es besteht auch keine Einig¬ 
keit darüber, ob nach der TAB-Funktion ein Semikolon stehen 
muß. 


10 REM TEST 19 TAB-Funktion 
100 PRINT TAB (10) "Hallo": 

110 IF POS(1) < 10 THEN 200 
200 PRINT 

210 PRINT"Hinter TAB keine Leerstelle erlaubt 
220 PRINT TAB(20) "Guten Morgen" 

230 PR INT"Semikolon nach TAB kann entfallen 
240 END 

300 PRINT"Nach TAB Semikolon erforderlich 
310 PRINT TAB(10);"Hai lo" 

RUN 

O Hailo 

Hinter TAB keine Leerstelle erlaubt 
Guten Morgen 

Semikolon nach TAB kann entfallen 
READY 


TEST 19, TAB-Funktion 

In diesem Test verwenden wir die nicht immer zur Verfügung ste¬ 
hende POS-Funktion, die mit einem beliebigen Argument die 
augenblickliche Cursorspalte ausgibt. Es soll überprüft werden, ob 
TAB auch mit nachfolgender Leerstelle angenommen wurde. 


4.5 Verschiedene Eingabebefehle 

Eingabebefehle ermöglichen es dem Bediener, während des Pro¬ 
grammlaufs Daten einzugeben. In allen BASIC-Versionen gibt es 
mindestens zwei Eingabebefehle. Beide haben Vor- und Nachteile. 


INPUT 

Der INPUT-Befehl ist praktisch in allen voll ausgebauten Dialek¬ 
ten in gleicher Weise anwendbar. Grundsätzlich werden durch die¬ 
sen Befehl Tastatureingaben der im Befehl stehenden Variablen 
zugewiesen. Vorteilhaft ist es, daß man bei den meisten BASIC- 
Versionen die Erklärung für den Benutzer, wofür die Eingabe 
angefordert wird, als Zeichenkette in den Befehl schreiben kann. 
Man spart so einen besonderen PRINT-Befehl. 
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Jede Tastatureingabe wird sofort auf dem Bildschirm gezeigt. Fal¬ 
sche Zeichen können mit der Löschtaste (BACKSPACE) wieder 
gelöscht werden. 

Der Computer überprüft meist, ob die Eingabe zur im Befehl ste¬ 
henden Variablen paßt. Er fordert mit dem Wort REDO zu erneu¬ 
ter Eingabe auf, wenn man versucht, einen Buchstaben in eine 
Zahlenvariable zu schreiben. 

Da das Komma als Trennzeichen zwischen zwei Eingaben verwen¬ 
det wird, kann man es mit diesem Befehl nicht eingeben. Das glei¬ 
che gilt meist für den Doppelpunkt und die Anführungszeichen. 

Einige ältere BASIC-Versionen (z. B. cbm) haben die unange¬ 
nehme Eigenschaft, das Programm abzubrechen, wenn nach einem 
INPUT-Befehl nur die RETURN-Taste allein betätigt wird. Leere 
INPUT-Eingaben müssen hier vermieden oder durch besondere 
Befehle abgefangen werden. 


10 REM TEST 20 INPUT-BeTehl 
20 INPUT"Komma eingeben":A 
30 PRINT" Komma wurde einqegeben",A 
40 INPUT'*Doppel punkt eingeben":A 
50 PRINT"Doppelpunkt eingegeben";A 
60 INPUT''Nur CR betätigen";A 
70 PRINT"Leerer INPUT erlaubt" 

80 GOTO 110 

100 PRINT"Kein leerer INPUT erlaubt" 

110 INPUT"AnTührungstriche im Text";At 
120 PRINT A$ 

130 END 

200 PR INT"Keine Erklärung im INPUT-BeTehl" 
RUN 

Komma eingeben? , 

?Extra ignored 

Komma wurde eingegeben O 

Doppelpunkt eingeben? : 

?Extra ignored 
Doppelpunkt eingegeben O 
Nur CR betätigen? 

Leerer INPUT erlaubt 

AnTührungstriche im Text? "ee"-f-f"gg" 

?RED0 

Antuhrungstriche im Text? ee"ff"gg 

ee"ff"gg 

READY 


TEST 20, INPUT-Befehl 

Der Test soll zeigen, ob es beim INPUT-Befehl Abweichungen vom 
Üblichen gibt. Probieren Sie, ob ein Programmabbruch erfolgt, 
wenn nach dem Erscheinen des INPUT-Fragezeichens nur die 
RETURN-Taste betätigt wird. Auch sollte untersucht werden, was 
bei der Eingabe des Kommas, des Doppelpunkts und der Anfüh¬ 
rungszeichen geschieht. 
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GEToder INKEY$ 

Der zweite Befehl, der für Eingaben verwendet werden kann, ist 
ein Abfragebefehl für die Tastatur, der bei den verschiedenen 
BASIC-Versionen unterschiedlich einzusetzen ist, und für den 
auch zwei verschiedene Befehlswörter gebräuchlich sind. Grund¬ 
sätzlich wird mit diesem Befehl der Tastencode einer betätigten 
Taste sofort einer Zeichenkettenvariablen zugewiesen, ohne daß 
die RETURN-Taste zu betätigen ist. 


10 REM TEST 21 

Einaabebetehle 

20 GET A* 


30 PRINT A$j 


40 IF A$=CHR$(1 

3) THEN 20 

50 END 


100 GET A*: IF 

A$="" THEN 100 

110 PRINT A*; 


120 IF A$=CHR»(13) THEN 100 

130 END 


200 A«=INkEY1i: 

IF At="" THEN 200 

210 PRINT Ai: 


220 IF A»=CHRi(13) THEN 240 

230 GOTO 200 


240 END 


RUN 


Tvoabweichuna in 20 

READY 


GOTO 100 


Tvpabweichung in 100 

READY 


>GOTO 200 


I234qwert 


READY 



TEST 21, Eingabebefehle 

Mit dem Test kann untersucht werden, welche Eingaben ein Com¬ 
puter akzeptiert. Dieser Befehl läuft dann In einer Schleife, bis man 
die RETURN-Taste betätigt. Man kann also ausprobieren, welche 
Zeichen angenommen werden. 


Da die Tastenabfrage sehr schnell geht, kann der Computer sie nur 
erkennen, wenn das Tastenfeld in einer Schleife vielfach abgefragt 
wird. Meist muß diese Warteschleife programmiert werden. Einige 
Computer (z. B. Apple) gehen aber auch selbst nach dem GET- 
Befehl in Wartestellung, bis eine Taste betätigt wird. Mit diesem 
Befehl können alle Zeichen der Tastatur - manchmal mit Aus¬ 
nahme der Anführungsstriche - eingegeben werden. Für die 
Anzeige der Tastatureingabe muß ein besonderer PRINT-Befehl 
geschrieben werden - besonders bei Verwendung von INKEY$. 
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Vielfach können aber Zahlen nur einer String-Variablen zugewie¬ 
sen werden. 

Der schwerwiegendste Nachteil bei der Eingabe mit GET oder 
INKEYS liegt bei den meisten BASIC-Versionen in der mangeln¬ 
den Korrekturmöglichkeit. Die Löschtaste wirkt zwar auf den 
Bildschirm, setzt aber (wenn eine Variable aus den eingegebenen 
Zeichen zusammengestellt wird) auch den Tastencode für die 
Löschtaste ein. Die Variable wird dann zwar richtig angezeigt, 
kann aber in einem Vergleichsbefehl nicht erkannt werden. Wie 
dieser Nachteil zu vermeiden ist, wird im Abschnitt 6.1 erklärt. 

LINE INPUT 

Die Nachteile beider Befehle vermeidet der bei vielen neueren 
BASIC-Versionen vorhandene LINE INPUT-Befehl. Er ermög¬ 
licht, wie GET und INKEYS, die Eingabe aller Tastaturzeichen, 
versetzt den Computer aber auch in Wartestellung. Die Über¬ 
nahme der Eingabe in eine Variable erfolgt erst nach RETURN, so 
daß die Löschtaste für Korrekturen wirksam bleibt. 


4.6 Bildschirm-Ausgabe 


10 REM TEST 22 

Komma 

und 

1 Semikolon 

100 

FÜR J = 1 TC 

1 5 




110 

FÜR K = 0 TC 

1 9 




120 

PRINT K: : NEXT K 



130 

PRINT : NEXT 

J 




140 

PRINT l;2;-3 

:;-4 




150 

PRINT 7,8,9 





160 

A^="BASIC" 





170 

PRINT A*:A$, 

A« 




RUN 






0 

12 3 4 

5 

6 

7 

8 9 

0 

12 3 4 

5 

6 

7 

8 9 

0 

12 3 4 

5 

6 

7 

8 9 

0 

12 3 4 

5 

6 

7 

8 9 

0 

12 3 4 

5 

6 

7 

8 9 

1 

2 -3 -4 





7 


8 



9 

BASICBASIC 

BASIC 



READY 






TEST 22, Komma und Semikolon 

Wie wirken Trennzeichen im PRINT-Befehl? Zahl der Leerstellen 
vor und hinter Zahlen und Zeichen nach dem Semikolon und 
Abstand bei den Kolonnen nach dem Komma differieren. 
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Ausgaben dienen unter anderem zur Darstellung der Ergebnisse 
der Computerarbeit und zum Dialog mit dem Computer. Während 
es in allen BASIC-Dialekten praktisch nur einen Ausgabebefehl 
gibt, sind die Möglichkeiten der Positionierung, also der Program¬ 
mierung jener Stelle auf dem Bildschirm, an der die Ausgabe 
erscheinen soll, recht vielfältig. 


Der PRINT-Befehl 

Der PRINT-Befehl läuft in allen BASIC-Versionen im wesentli¬ 
chen gleich. Dem Befehlswort können Variable, Rechenausdrücke 
oder in Anführungsstrichen auch Zeichenketten folgen. Geringe 
Unterschiede gibt es lediglich bei Verwendung der erlaubten 
Trennzeichen, Komma und Semikolon. 

Für die Ausgabe verfügbare Zeichen 

ASCII Code 


hex 

dez. 

ASCII 

hex 

dez. 

ASCII 

hex 

dez. 

ASCII 

hex 

dez. 

ASCII 

00 

0 

NUL 

20 

32 

Space 

40 

64 

Cä) 

60 

96 

\ 

01 

1 

SOH 

21 

33 

! 

41 

65 

A 

61 

97 

a 

02 

2 

STX 

22 

34 

•• 

42 

66 

B 

62 

98 

b 

03 

3 

ETX 

23 

35 

# 

43 

67 

C 

63 

99 

c 

04 

4 

EOT 

24 

36 

$ 

44 

68 

D 

64 

100 

d 

05 

5 

ENQ 

25 

37 

% 

45 

69 

E 

65 

101 

e 

06 

6 

ACK 

26 

38 

& 

46 

70 

F 

66 

102 

f 

07 

7 

BEL 

27 

39 


47 

71 

G 

67 

103 

g 

08 

8 

BS 

28 

40 

( 

48 

72 

H 

68 

104 

h 

09 

9 

HT 

29 

41 

\ 

49 

73 

1 

69 

105 

i 

OA 

10 

LF 

2A 

42 


4A 

74 

J 

6A 

106 

j 

OB 

11 

VT 

2B 

43 

+ 

4B 

75 

K 

6B 

107 

k 

OC 

12 

FF 

2C 

44 


4C 

76 

L 

6C 

108 

I 

OD 

13 

CR 

2D 

45 

— 

4D 

77 

M 

6D 

109 

m 

OE 

14 

SO 

2E 

46 


4E 

78 

N 

6C 

110 

n 

OF 

15 

Sl 

2F 

47 

/ 

4F 

79 

0 

6F 

111 

0 

10 

16 

DLE 

30 

48 

0 

50 

80 

P 

70 

112 

P 

11 

17 

DC1 

31 

49 

1 

51 

81 

Q 

71 

113 

q 

12 

18 

DC2 

32 

50 

2 

52 

82 

R 

72 

114 

r 

13 

19 

DC3 

33 

51 

3 

53 

83 

S 

73 

115 

s 

14 

20 

DC4 

34 

52 

4 

54 

84 

T 

74 

116 

t 

15 

21 

NAK 

35 

53 

5 

55 

85 

U 

75 

117 

u 

16 

22 

SYN 

36 

54 

6 

56 

86 

V 

76 

118 

V 

17 

23 

ETB 

37 

55 

7 

57 

87 

w 

77 

119 

w 

18 

24 

CAN 

38 

56 

8 

58 

88 

X 

78 

120 

X 

19 

25 

EM 

39 

57 

9 

59 

89 

Y 

79 

121 

y 

1A 

26 

SUB 

3A 

58 


5A 

90 

z 

7A 

122 

z 

1B 

27 

ESC 

3B 

59 

; 

5B 

91 

1 

7B 

123 

I 

IC 

28 

FS 

3C 

60 

< 

* 5C 

92 


' 7C 

124 


ID 

29 

GS 

3D 

61 

= 

j 5D 

93 

! 

1 7D 

125 

I 

IE 

30 

RS 

3E 

62 

> 

1 5E 

94 

T 


126 

r\. 

1F 

31 

US 

3F 

63 

? 

, bF 

95 

— 

1 7F 

127 

DEL 


Abb. 10: Der ASCU-Code in der internationalen Version 
In der deutschen Version sind die Codierungen mit den Dezimalwer¬ 
ten 91, 92, und 93 den großen Umlauten Ä, Ö und Ü zugewiesen. Die 
kleinen Umlaute haben den Code 123, 124 und 125, das ß 126. Die 
Bedeutung der Steuerzeichen 0 bis 31 ist nicht ganz einheitlich 
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Bei allen Computern können die Ziffern und Großbuchstaben 
sowie eine Reihe von Satz- und Sonderzeichen auf dem Bildschirm 
gezeigt werden. In der Hauptsache wird der Zeichensatz verwen¬ 
det, der als ASCII-Code genormt wurde (Abb. 10). In Kleinigkei¬ 
ten gibt es aber viele Abweichungen, die teilweise durch Eigenhei¬ 
ten der nationalen Schreibweisen bedingt sind. 

Da der ASCII-Code nur 7 Bit benutzt, können dort 128 Zeichen 
untergebracht werden. Hiervon sind die ersten 32 nicht druckbare 
Steuerzeichen, und nur die Zeichen mit den dezimalen Codewerten 
32 bis 127 ergeben eine Anzeige auf dem Bildschirm. In vielen 
BASIC-Versionen werden aber für den Zeichencode alle 8 zur Ver¬ 
fügung stehenden Bit verwendet, was dann die Darstellung von bis 
zu 256 Zeichen ermöglicht. Hierbei weisen die verschiedenen Dia¬ 
lekte erhebliche Unterschiede auf. 

Die darstellbaren Zeichen können leicht mit der CHR$-Funktion 
ermittelt werden. 


10 REM 

TEST 2 

3 CHR»-Funkt 

1 on 






100 

FOR 


= 32 TO 

126 







1 10 

PRI 

NT 

TAB(POS(1)+2)jCHR*(K> 

f 




•120 

IF 

POS(1) 

40 

THEN PRINT 





130 

NEXT 










RUM 













' 

•• 

n 

T •/. 

?< ' 

( 

> 

* 

+ 


- 

. 

/ 


1 

2 3 

4 5 

6 

7 

B 

9 


: 

< 

= 

> 


§ A 

B C 

D 

E 

F 

G 

H 

I 

J 

K 

L 

M 

N 0 

P Q 

R 

S 

T 

U 

V 

W 

X 

Y 

Z 

Ä 

ö ü 



a 

b 

c 

d 

e 

f 

g 

h 

i 

i k 

1 m 

n 

o 

P 

q 

r 

s 

t 

u 

V 

w 

X V 

z ä 

ö 

ü 

ß 




READY 












TEST 23, CHR$-Funktion 

Das Testprogramm ist auf den Standard-ASCII-Code ausgerichtet. 
Gegebenenfalls müssen die Anfangs- und Endwerte für die Lauf¬ 
variable in Zeile 100 geändert werden. In der Zeile 120 wird nur aus 
drucktechnischen Gründen die Länge der Ausgabezeilen 
beschränkt. Dies kann auch entfallen. 


Bildschirmcode 

Einige BASIC-Versionen (z. B. Commodore) benutzen für die 
Speicherung der Bildschirmdaten einen besonderen Bildschirm¬ 
code, der von dem normalen Ausgabecode abweicht. Man kann 
dann dort alle 256 Codes für darstellbare Zeichen nutzen. Da der 
Computer intern den allgemeinen Speichercode in den Bildschirm- 
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Code umsetzt, erscheinen eingegebene Steuerzeichen auch als 
besondere Zeichen auf dem Bildschirm. 

Der Bildschirmcode muß verwendet werden, wenn einzelne Zei¬ 
chen mit dem POKE-Befehl direkt in den Bildschirmspeicher 
geschrieben werden sollen. 


10 REM TEST 24 Bildschirmcode 
20 CLS: FÜR K = O Tü 126 

30 IF KOO AND K/32=INT (K/32) THEN Z = Z4-1 
40 POKE 15680+K + Z*32,K: 

50 NEXT 
90 STOP 

100 FÜR K = 128 TO 255 

120 IF K/32 = INT(K/32> THEN Z=Z+1 

130 POKE 15680+K-4-Z*32,K 

140 NEXT 

Break in 90 
READY 
>C0NT 
READY 

iABCDEFGHIJKLMNOPQRSTUVWXYZÄöü-" 

! () * + , /0123456789: ; < = >? 

iABCDEFGH IJKLMNOPQRSTUVWX YZÄöü 
'abcdeTghijklmnopqrstuvwxvzäöüß 


TEST 24, Bildschirmcode 

Das Testprogramm muß an den verwendeten Computer angepaßt 
werden. In den POKE-Befehl gehört jeweils die erste Adresse des 
Bildschirmspeichers. Auch die Anzahl der druckbaren Zeichen dif¬ 
feriert in den verschiedenen BASIC-Dialekten. 

Die Zeichen werden im Testprogramm in zwei getrennten Schlei¬ 
fen auf den Bildschirm geschrieben. Da der Code 127 bei der ver¬ 
wendeten Computer/Drucker-Kombination als Löschbefehl für den 
Pufferspeicher im Drucker wirkt, darf dieser Code nicht in einer zu 
druckenden Ausgabe verkommen. Die Zeilen 30 und 120 bewirken 
nur eine Verkürzung der Zeilenlänge. Die Zeichen ab Code 128 
können auf dem verwendeten Drucker nicht in der Hardcopy 
gedruckt werden. 


Positionierung der Ausgaben 

Normalerweise beginnt die Ausgabe auf dem Bildschirm nach 
einem PRINT-Befehl immer am Anfang der nächsten Zeile. Mit 
der TAB-Funktion kann der Beginn der Ausgabe auf die in der 
Klammer folgende Tabulatorstelle gelegt werden. Bei dieser Funk¬ 
tion ist zu beachten, daß meist kein Leerzeichen vor der Klammer 
stehen darf. Zwischenräume können mit der SPC-Funktion oder 
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einfach durch Leerzeichen in einer Zeichenkette programmiert 
werden. 

Soweit gibt es wenig Unterschiede bei den BASIC-Dialekten. 
Unterschiedlich sind aber schon die Befehle, die zu geben sind, 
wenn der Bildschirm gelöscht und der Cursor auf die Anfangsposi¬ 
tion gesetzt werden soll. Bei einigen Computern heißt der Befehl 
hierfür CLS, bei anderen HOME; und es gibt daneben Computer, 
bei denen das Bildschirmlöschen und das Rückführen des Cursors 
getrennt durch Tastenbetätigung programmiert werden muß. Auch 
der Anruf eines Unterprogramms zu diesem Zweck ist üblich. 

In jedem Fall beginnt die neue Ausgabe in der Position, in der der 
Cursor vor dem PRINT-Befehl steht. Für die Positionierung des 
Cursors sind im wesentlichen sechs verschiedene Methoden ge¬ 
bräuchlich. 

V- und H-Tabulator 

Einige Computer (z. B. Apple) gestatten die Positionierung des 
Cursors über getrennte vertikale (VTAB) und horizontale (HTAB) 
Tabellatorbefehle. Manchmal muß danach die absolute Position, 
manchmal aber auch der relative Abstand zur letzten Position ein¬ 
gesetzt werden. 

Cursorpositionierung durch CHR$-Funktionen 

Meist gibt es - leider nicht einheitliche - ASCII-Codewerte für die 
Steuerzeichen zur Cursorbewegung. Sie können dann nach 
PRINT-Befehlen mit der CHR$-Funktion aufgerufen und in die¬ 
ser Form auch in das Programm geschrieben werden. 

Cursorpositionierung mittels Pfeiltasten 
Einige Computer (z. B. Commodore und MZ 80) erlauben durch 
Verwendung von Pfeiltasten Cursorbewegungen auch innerhalb 
eines Programms. Die Anweisungen müssen dann innerhalb von 
Zeichenketten nach einem PRINT-Befehl stehen. In einer Pro¬ 
grammliste erscheinen sie manchmal als charakteristische Negativ¬ 
zeichen, die für den Unkundigen nur schwer zu deuten sind. 

Positionierung mit PRINT@ 

Recht einfach ist die Positionierung bei denjenigen Computern 
(z. B. Genie, TRS 80), bei denen die Bildschirmpositionen durch¬ 
gehend numeriert sind. Mit Hilfe des PRINT@-Befehls kann die 
Ausgabe an die Bildschirmposition gesetzt werden, die dem 
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Befehlswort PRINT@ folgt. Hierbei kann der Computer die Posi¬ 
tion auch aus einem dort stehenden Rechenausdruck berechnen. 
Nach der Positionsnummer muß ein Komma stehen, dem dann die 
zu druckenden Informationen folgen. Abgeschlossen wird der 
Befehl am besten mit einem Semikolon, um den weiteren Zeilen¬ 
vorschub zu verhindern. Mit nur einem Semikolon nach dem der 
Zeilennummer folgenden Komma kann auch die Eingabe auf einen 
INPUT-Befehl hin an eine bestimmte Bildschirmstelle gesetzt 
werden. 


Positionierung mit LOCATE oder PRINT AT 

Beide Befehle arbeiten mit Zeilen- und Spaltennummern, die, 
durch ein Komma getrennt, dem Befehlswort folgen müssen. Im 
übrigen entspricht die Anwendung dem PRINT@-Befehl. 


Positionierung über POKE-Befehle 

Da jede Position des Bildschirmspeichers eine feste Adresse hat, 
kann man in diese die Zeichencode direkt mit POKE-Befehlen 
einschreiben. Diese Methode erlaubt einen schnellen Wechsel der 
Anzeige, erfordert aber auch erheblichen Programmieraufwand. 

Die Erzeugung eines gut proportionierten Bildes auf dem Schirm 
kann also sehr unterschiedlich programmiert werden. Es ist darum 
meist nicht möglich, einen Programmteil mit positionierter Aus¬ 
gabe so ohne weiteres zu übernehmen, wenn er auf einem anderen 
Computer entwickelt wurde. 


4.7 Vergleichsoperationen 

Die zugelassenen Vergleichsoperatoren sind in allen BASIC-Ver- 
sionen gleich: Unterschiede gibt es aber in der Wirkung und bei 
den Anwendungen. 


Meldung des Vergleichsergebnisses 

Trifft der Computer im Programmlauf auf einen Vergleichsaus¬ 
druck, stellt er fest, ob dieser »wahr«, also richtig formuliert, oder 
»falsch« ist. Je nach dem Ergebnis wird intern eine Zahl gesetzt, die 
man auch Merker nennt. Sie kann meist abgefragt oder ausgegeben 
werden. Es gibt allerdings Unterschiede, welchen Wert dieser Mer¬ 
ker bei »wahr« und »falsch« hat. 
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Vielfach kann mit den Zahlen im Vergleichsmerker gerechnet wer¬ 
den. Man kann dann mehrere in Klammern geschriebene Verglei¬ 
che durch Rechenoperatoren verbinden und das Ergebnis abfragen. 


10 REM TEST 25 Vergleichserqebnisse 
20 A = 4 : B = 5 

30 PRINT"Ausgabe bei WAHR => ":A < B 
40 PRINT"Ausgabe bei FALSCH => ";A > B 
50 GOTO 110 

100 PRINT"Keine Ausgabe Vergleichsergebnis" 
110 C = (A>B) + (B>A) + (A=B)-4-NGT(A=B) 

120 PRINT"2 Vergleiche falsch also C=";C 
130 END 

200 PRINT"Kein Rechnen mit Vergl ei chsergebn. 
RUN 

Ausgabe bei WAHR => —1 
Ausgabe bei FALSCH => 0 

2 Vergleiche -falsch also C=—2 
READY 

> 


TEST 25, Vergleichsergebnisse 

Das Testprogramm ermittelt zuerst, welche Merker bei wahrem 
und falschem Vergleichsergebnis erzeugt werden, und prüft dann, 
ob mit diesen Zahlen auch gerechnet werden kann. 


Bei einigen BASIC-Versionen sind verkürzte Vergleiche nach IF 
zulässig. Dies bedeutet, daß eine dort stehende Zahl (oder Zahlen¬ 
variable) als Vergleichsmerker interpretiert wird. 


10 REM TEST 26 Verkürzter Vergleich 
20 INPUT A 

30 IF A THEN FRINT"RICHTIG" : GOTO 20 
40 PR INT"FALSCH" : GOTO 20 

RUN 

1 

RICHTIG 

-1 

RICHTIG 
? 0 

FALSCH 

123 

RICHTIG 
? 123456 
RICHTIG 


I TEST 26, Verkürzter Vergleich 

Das Programm erlaubt es auszuprobieren, welche Zahlen als fal¬ 
sches oder richtiges Vergleichsergebnis interpretiert werden. 
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Verkettete Vergleiche 

Unterschiedlich ist weiterhin das Laufverhalten, wenn in einem 
Befehl mehrere Vergleiche zusammengefaßt werden. Man kann 
hierfür die logischen Operatoren AND und OR benutzen. Oft ist 
dies aber auch durch Verschachtelung mehrerer IF-Abfragen vor 
dem THEN möglich. 


10 REM TEST 27 Verschiedene Veraleiche 
20 A=5: B=6: C=7: D«="5" 

30 PRINT"A=5: B=6: C=7: D4i=’*: CHR* (34) ; "5" 

40 IF A < B THEN PRINT"A < B ist wahr 

50 IF A‘B IF BvC THEN PRINT"A<B und B<C sind wahr 

60 IF (A<B) + (&-;C)=-2 THEN PRINT"A<B und B<C ist wahr 

70 IF (A:=B)+ <B<.C> =-l THEN PRINT"A>B oder A<B ist wahr 

80 IF VAL(D$)=A THEN PRINT"D* ist gleich A 

90 IF D«=CHR$(53) THEN PR INT"CHR$(53> ist 5 

100 IF ASC(Dt)=53 THEN PRINT"ASCII Code von D«=53 

110 IF A=VAL(CHR$(53)> THEN PRINT "A ist gleich D$ 

120 IF STRS(A)=D^ THEN PRINT"A als String ist = D*:END 
130 IF MID$(STRS(A>,2,1)=D$ THEN PRINT 
"Die erste Stelle muß abgetrennt 
werden damit Zahl = String ist 

RUN 

A=5: B=6: C=7: D^="5 

A ‘ Bl st wahr 

A-B und B'C sind wahr 

A<B -and B- C ist wahr 

AB oder A'B ist wahr 

D* ist gleich A 

CHR$(53) ist 5 

ASC1I Code von D^=53 

A ist gleich D* 

Die erste Stelle muß abgetrennt 
werden damit Zahl = String ist 
READY 


TEST 27, Verschiedene Vergleiche 

Das Programm prüft, ob unterschiedlich formulierte Vergleiche 
von dem benutzten BASIC-Dialekt angenommen werden, und mel¬ 
det, wenn dies der Fall ist. Schwierigkeiten können auftreten beim 
Vergleich einer als Zeichenkette gespeicherten Zahl mit einer 
durch die STR$-Funktion in eine Kette gewandelten Zahl, wenn 
dort das (nicht sichtbare) Vorzeichen als erstes Zeichen gespei¬ 
chertwird. 


Einzelbitprüfung 

Nicht alle BASIC-Versionen prüfen einzelne Bit in einem Bitmu¬ 
ster. Voraussetzung hierfür wäre, daß bei logischen Operationen 
die einzelnen Bit eines Byte einzeln verarbeitet werden. 
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10 REM TEST 28 Einzelbi tprü-funq 

20 PRINT: INPUT"Welches Bit prü-fen (O. .7>";N 

30 INPUT"Dez . Zahl ei ngeben" ; A7. 

50 IF (A7. AND 2ÄN)=2ÄN THEN PRINT 

••Das Bit Nr."N*^ ist 1": GOTO 20 

60 PRINT^’Das Bit Nr . ••; N;'• i st O^*: GOTO 20 

RUN 

Welches Bit orü-fen (0..7)7 1 
Dez.Zahl eingeben? 12 
Das Bit Nr. 1 ist O 

Welches Bit prü-fen (0..7)? O 
Dez.Zahl einqeben? 127 
Das Bit Nr. O ist 1 

Welches Bit prü-fen (0..7)? 0 
Dez.Zahl eingeben? 128 
Das Bit Nr. O ist O 


TEST 28, Einzelbitprüfungen 

Das Programm prüft, ob ein einzelnes Bit in einem Bitmuster den 
Wert 1 oder 0 hat. Nur wenn das Programm bei allen Prüfzahlen 
richtige Ergebnisse ausgibt, unterstützt das verwendete BASIC 
auch die Einzelbitverarbeitung.* 

Alphabetische Ordnung von Zeichenketten 

Buchstaben können auf der Basis ihrer ASCII-Codewerte alphabe¬ 
tisch geordnet werden, da das A den kleinsten und das Z den 
größten Codewert hat. Die meisten BASIC-Dialekte können 
darum auch eindeutig feststellen, ob ein Wort im Alphabet vor 


10 REM TEST 29 Alphavergleich 
20 A»="HAUS": B$="HANS" 

30 IF B* = A* THEN 50 
40 IF B* < A* THEN 60 

50 PRINT"Alphavergleich nur 1.Buchstabe":END 
60 PRINT"HANS im Alphabet vor HAUS- 

RUN 

HANS im Alphabet vor HAUS 
READY 


TEST 29, Alphavergleich 

Das Programm stellt fest, ob ganze Wörter nach dem Alphabet 
geordnet werden können, oder ob beim Vergleich von Zeichenket¬ 
ten mit den Operatoren < oder > nur das erste Zeichen berück¬ 
sichtigt wird. 


der in den Beispielen dieses Buches verwendete Drucker mit deutschem Zeichen¬ 
satz arbeitet, wird statt des Potenzierungsoperators ein Ä und statt @ ein § gedruckt. 
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einem anderen einzuordnen ist. Voraussetzung hierfür ist, daß alle 
Buchstaben der Wörter in den Vergleich miteinbezogen werden. 
Außerdem können natürlich nur Großbuchstaben mit Großbuch¬ 
staben und Kleinbuchstaben mit Kleinbuchstaben verglichen 
werden. 


4.8 Direkter Speicherzugriff 

POKE- und PEEK-Befehle 

Alle voll ausgebauten BASIC-Dialekte kennen Befehle, mit denen 
Bitmuster direkt in eine Speicherstelle geschrieben bzw. von dort 
gelesen werden können. Während POKE als Anweisung zu benut- 


10 REM TEST 

30 Soeicherzugri-f-f 

20 FÜR K = 

32765 TG 32770 

40 PRINT K. 

PEEK(K> 

50 NEXT 


60 PRINT"Adresse immer dezimal": END 

100 PRINT“Adresse nur bis“;K-1;"verwendbar, 

darüber Komplementzahl benutzen" 

HO FÜR K = 

32765 TO 32770 

120 A = K + 

65336 » (K > 32767) 

130 PRINT A 

,PEEK(A) 

140 NEXT 


RUN 


32765 

255 

32766 

255 

32767 

255 

32768 


Ueber 1 au-f 

in 40 

READY 


GOTO 100 


Adresse nur 

bis 32767 verwendbar. 

darüber Komolementzahl benutzen 

32765 

255 

32766 

255 

32767 

255 

-32568 

136 

-32567 

0 

-32566 

136 

READY 


> 



TEST 30, Speicherzugriff 

Mit diesem Test kann geprüft werden, in welcher Form bei PEEK- 
und POKE-Befehlen die Adresse im Befehl zu schreiben ist. Wenn 
die Komplementzahl eingesetzt werden muß, wird diese in Zeile 
120 berechnet. Wenn die Adresse größer als 32767 ist, wird der 
Klammerausdruck -1, und es wird -65336 + Adresse gerechnet. 
Ist die Adresse kleiner als 32767, hat die Klammer den Wert 0, und 
die Adresse bleibt unverändert. 
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zen ist, der die Speicheradresse und das zu speichernde Bitmuster 
als Dezimalzahl folgen müssen, ist PEEK mit nachfolgender 
Adresse in Klammern als Funktion zu verwenden. 

Ein wesentlicher Unterschied besteht jedoch bezüglich der Einset¬ 
zung der Adresse bei den BASIC-Dialekten. Am einfachsten für 
den Benutzer ist es, wenn der ganze Bereich der verfügbaren 
Adressen als Dezimalzahl eingesetzt werden kann. Manchmal kann 
es aber dann noch die Beschränkung geben, daß nur RAM-Adres¬ 
sen abfragbar sind. 

Andere BASIC-Versionen verlangen, daß Adressen über 32767 als 
Komplementzahl (Adreßzahl — 65336) eingesetzt werden. 


Die VARPTR-Funktion 

Einige neuere BASIC-Versionen kennen die VARPTR-Funktion, 
mit der die Adresse bestimmt werden kann, an der eine bestimmte 
Variable gespeichert ist. Die Wirkung dieser Funktion fällt aber, je 
nach der Art der Variablenspeicherung, unterschiedlich aus. Viel¬ 
fach ermittelt die Funktion nicht die erste Speicheradresse der 
Variablen (in der oft das erste Zeichen des Namens steht), sondern 
den Anfang der Datenspeicherung. Bei Zeichenketten kann mit 
VARPTR nur der Zeiger gefunden werden, der auf den Anfang des 
eigentlichen Zeichenspeichers zeigt (Abb. 11). 


10 REM Demonstration Variablensoeicherung 
20 Ay.= 100 : B! =100000 : C*="MAIER" 

30 PRINT VARPTR (A7.>, 

40 FOR K=-3 TO 1; PRINT PEEK (VARPTR (A7.)-«-K) NEXT 
50 PRINT:PRINT:PRINT VARPTR(B!>, 

60 FOR K=-3 TO 3: PRINT PEEK (VARPTR (B !)-»-K) ;: NEXT 
70 PRINT:PRINT:PRINT VARPTR(□♦), 

80 FOR K =-3 ro 2:PRINT PEEK(VARPTR(CO+K)NEXT 
90 PRINT ; PRINT 

100 X=PEEK(VARPTR(C^)-»-l) : Y=PEEK (VARPTR (CO+2) 
110 FOR K= 0 TO 4: PRINT PEEK(X+256»Y+K);: NEXT 
RUN 

27506 2 O 65 100 O 

27511 4 O 66 O 80 67 145 

27518 3 0 67 5 140 106 

77 65 73 69 82 

READY 


Abb. 11: Untersuchung des Variablenspeichers mit VARPTR 

Einige BASiC-Diaiekte erlauben die genaue Untersuchung der Spei¬ 
cherplätze, in denen Variable abgelegt sind. Die VARPTR-Funktion 
stellt immer die Adresse des 4. Byte des Bereichs, in dem die im 
Argument stehende Variable gespeichert ist, zur Verfügung. Der 
Inhalt dieser Speicherstellen ist dann mit PEEK abzurufen 
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Unterprogramme in Maschinensprache 
Fast alle BASIC-Versionen haben auch Befehle, mit denen ein 
Unterprogramm in Maschinensprache angerufen werden kann. 
Hierfür werden meist die Befehlswörter USR oder CALL verwen¬ 
det. Es gibt jedoch große Unterschiede in der Anwendung. 

Bei einigen Dialekten können Unterprogramme mit einem Namen 
aufgerufen werden. Andere verlangen, daß die Startadressen der 
Unterprogramme vorher mit DEFUSR definiert werden. Es gibt 
auch Versionen, bei denen man die Startadresse vorher mit POKE- 
Befehlen in bestimmte Adressen einschreiben muß. 

Unterschiedlich auch die Möglichkeiten, Parameter in ein Unter¬ 
programm zu übergeben bzw. von dort zu übernehmen. 


FOR... NEXT-Schleifen 



10 REM TEST 31 Verschachte!una F0R..NEXT 

100 FÜR Kl=l Tü 5 

105 GÜSUB 210 

110 FÜR K2=l Tü 5 

120 FÜR K3=l Tü 5 

125 GÜSUB 210 

130 FÜR K4=l Tü 5 

135 GÜSUB 210 

140 FOR K5=l TO 5 

145 GÜSUB 210 

150 FOR K6=l TO 5 

160 FÜR K7=l TO 5 

170 FOR K8=l TO 5 

180 FOR K9= ITO 5 

200 NEXT:NEXT:NEXT:NEXT:NEXT: 

210 PRINT K'l;K2;K3;k4:K5 
220 RETURN 

RUN 

1 O O O O 
1110 0 
11110 
11111 
11112 

11113 

11114 

11115 

11116 

RETURN ohne GÜSUB in 220 
READY 


TEST 31, Verschachtelungen 

Da die BASIC-Dialekte bei dieser Prüfung sehr unterschiedlich rea¬ 
gieren, kann hier nur ein Vorschlag gemacht werden, wie man die 
Fähigkeit zu Verschachtelungen prüfen kann. Wenn das BASIC wie 
im Test läuft, ist es benutzerfreundlich. Das Programm ist, damit 
der Ausdruck nicht zu lang wird, unvollständig geschrieben und 
wird doch in den Schleifen angenommen. 
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Wenn die Befehle für diese Schleifenart auch in allen BASIC-Dia- 
lekten gleich lauten, so kann das Laufverhalten doch recht unter¬ 
schiedlich ausfallen. 

Richtige Verschachtelungen mehrerer Schleifen, bei denen die 
zuletzt angesprochene Laufvariable zuerst wieder im NEXT- 
Befehl angezogen werden muß, sind allgemein erlaubt. Uneinheit¬ 
lich ist allerdings die zugelassene Anzahl der Verschachtelungs¬ 
ebenen. Sie kann davon abhängen, ob gleichzeitig noch Unterpro¬ 
gramme laufen. 

Es ist bekannt, daß Einsprünge in FOR... NEXT-Schleifen nicht 
erlaubt sind und immer zu einer Fehlermeldung führen, wenn im 
Programm das Wort NEXT ohne vorangegangenes FOR angetrof¬ 
fen wird. Aussprünge aus diesen Schleifen sind aber in vielen 
BASIC-Dialekten gestattet. 


10 REM 

TEST 32 Aussoruno 

aus Schleifen 

1 00 

FOR K=10 TO 12 


110 

PRINT K 


120 

FOR J=1 TO 5 


130 

PRINT J: 


1 40 

IF 

J = 4 THEN PRINT: 

GOTO 120 

1 50 

NEXT J 


160 

NEXT K 


RUN 




10 




1 

2 

3 4 


1 

2 

3 4 


1 

2 

3 4 


1 

2 

3 4 


1 

2 

3 4 


1 

2 

3 4 


1 

2 

3 4 


Break 

in 140 


READY 








TEST 32, Aussprung aus Schleifen 

Mit diesem Test kann geprüft werden, ob der Aussprung aus einer 
inneren Schleife zum Programmabbruch führt. Manchmal Ist das 
der Fall. Bei einem »gutmütigen« BASIC läuft das Testprogramm 
ewig und muß mit BREAK abgebrochen werden. 

Wenn im verwendeten BASIC-Dialekt der Aussprung aus einer 
Schleife nicht erlaubt ist, kann man sich mit einem einfachen Trick 
helfen, der in Abb. 12 gezeigt wird. Wird zum Beispiel ein größeres 
Feld durchsucht, kann der Programmlauf beschleunigt werden, 
wenn die Suchschleife nach dem Finden des Schlüssels abgebrochen 
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wird. Ist dies in der verwendeten BASIC-Version nicht vorgese¬ 
hen, wird im Entscheidungsbefehl die Laufvariable einfach auf den 
Endwert oder einen größeren Wert gesetzt, worauf bei NEXT die 
Schleife ordnungsgemäß zum Ende kommt. 


10 REM Suchen in einem Feld 
20 DIM A*(500) 

30 A*(12)="Humboldt" 

100 FÜR K = 1 TO 100 

110 IF A*(K)=**Humboldt" THEN H=K; K=500 
120 NEXT K 

130 PRINT"Humboldt steht in A* mit Index"jH 
RUN 

Humboldt steht in A* mit Index 12 
READY 


Abb. 12: Suchen in einem Feid mit Schieifenabbruch 

Wenn in einem BASIC-Dialekt der Aussprung aus einer nicht voll 
abgelaufenen FOR ... NEXT-SCHLEIFESchwierigkeiten macht, kann 
man diese umgehen, indem bei erfüllter Aussprungbedingung der 
Schleifenzähler auf den Endwert oder auf einen noch höheren Wert 
gesetzt wird. Bei NEXT kommt die Schleife dann ordnungsgemäß 
zum Ende 


4.10 Bedienung von Druckern 

Für die Ansteuerung eines Druckers kommen bei den verschiede¬ 
nen BASIC-Versionen zwei unterschiedliche Verfahren zum Ein¬ 
satz. Eine Reihe von Computern verwendet in ihrem BASIC- 
Befehlssatz ein besonderes Befehlswort, wenn die Ausgabe statt auf 
dem Bildschirm auf dem Drucker erfolgen soll. Andere wiederum 
betrachten den Drucker als ein Peripheriegerät, das genauso anzu¬ 
sprechen ist, wie die übrigen peripher anschließbaren Geräte. 

Druckbefehle 

Für die erste Methode wird häufig das Befehlswort LPRINT 
gebraucht. Es kann ohne weitere Vorbereitung in das Programm 
eingesetzt werden. Lediglich die im Befehl nachfolgenden Aus¬ 
drücke werden zum Drucker geleitet und dort abgedruckt. Im Pro¬ 
gramm folgende normale PRINT-Befehle veranlassen, wie üblich, 
die Ausgabe auf dem Bildschirm. 

Die meisten BASIC-Versionen, die in dieser Weise arbeiten, erlau¬ 
ben durch das Befehlswort LLIST den Ausdruck der Programmli¬ 
ste auf einem Drucker. 
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Bei dem anderen Verfahren muß das Drucken mit dem OPEN- 
Befehl vorbereitet werden. Wird danach der normale PRINT- 
Befehl verwendet, erfolgt die Ausgabe an den Drucker, statt an den 
Bildschirm. 


Zeilentransport und Druckpositionierung 

Bei der Ausgabe auf den Drucker ist immer zu berücksichtigen, 
daß die Anzahl der Zeichen in einer Zeile auf dem Bildschirm und 
beim Drucker unterschiedlich sein kann. Im allgemeinen wird das 
Steuerkommando, das am Ende einer Bildschirmzeile die Fort¬ 
schaltung zur nächsten Zeile bewirkt, nicht an den Drucker weiter¬ 
gegeben. Auf der anderen Seite macht der Drucker immer einen 
Zeilenvorschub, wenn seine Zeilenkapazität erschöpft ist. 

Befehle zur Positionierung der Bildschirmausgabe haben für die 
Druckerausgabe meist keine Wirkung. Eine Ausnahme hiervon 
sind die Funktionen TAB und SPC, die auch von Druckern 
berücksichtigt werden. Es gibt aber wiederum besondere Positio¬ 
nierungsmöglichkeiten für die Druckerausgabe mit Hilfe von Steu¬ 
erzeichen. 


Steuerzeichen 

Uneinheitlich ist die Behandlung der verschiedenen Steuerzeichen 
des ASCII-Codes durch die Drucker. Allgemein verstanden und 
richtig ausgeführt werden die Kommandos für Zeilen und Papier¬ 
transport, obwohl es dafür bei einigen Druckern Wahlmöglichkei¬ 
ten durch Schalter gibt. Bei anderen Steuerzeichen reagieren die 
Drucker aber unterschiedlich. Insbesondere Befehlsfolgen mit 
ESCAPE (ASCII-Codewert 27) werden recht abweichend inter¬ 
pretiert. Sie werden bei vielen Druckern zum Umschalten auf Fett¬ 
oder Spreizdruck und für viele andere Voreinstellungen verwendet. 

Schwierigkeiten können bei der Ausgabe an einen Drücker entste¬ 
hen, wenn dieser in den Befehlen stehende Steuerzeichen nicht 
annimmt oder anders ausdruckt, als der Bildschirm anzeigt. Insbe¬ 
sondere beim Ausdruck eines Commodore-Programms auf einen 
nicht voll an diesen Computer angepaßten Drucker kann es Vor¬ 
kommen, daß die in Zeichenketten stehenden Steuerzeichen über¬ 
haupt nicht erkannt und nicht gedruckt werden. Wenn man ver¬ 
sucht, ein so gelistetes Programm zum Laufen zu bringen, kann 
man eine böse Überraschung erleben. Das Programm ist ja nur 
unvollständig dargestellt. 
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standardbefehle im erweiterten BASIC 


CLEARoder CLR 

löscht Variablenspeicher 


CLS oder HOME 

löscht Bildschirm 


DEFDBL 

definiert Variable als doppelt genau 


DEFINT 

definiert Variable als Ganzzahl 

(h 

(D 

DEFSNG 

definiert Variable als einfach genau 

Ü) 

Ö 

DEFSTR 

definiert Variable als Zeichenkette 

CO 

DEFFN 

Definition einer Funktion 

0) 

FN 

Aufruf definierter Funktionen 

s 

GEToderlNKEYI 

Tastaturabfrage ohne Anzeige 

INP 

enthält Bitmuster vom Eingangsport 


LINE INPUT 

Eingabe aUer Zeichen bis CR 

& 

LOCATE oder 
PK[NT@ 

Positionierung der Ausgabe 

o» 

MOD 

liefert Divisionsrest 

OUT 

gibt Bitmuster an Ausgangsport 


RANDOMIZE 

Neusetzen des Zufallszahlgenerators 


PRINT USING 

formatierte Ausgabe 


SWAP 

Tausch von Variablen 

(0 

CALL oderUSR 

Aufruf Unterprogramm in Maschinen¬ 
sprache 

II ^ 

PEEK 

enthält Bitmuster aus Speicheradresse 

.3^ £ 
w .3 ö 

POKE 

schreibt Bitmuster in Speicheradresse 

VARPTR 

enthält 1 Byte eines Variablenspeichers 

Druk- 

ker 

LPRINT 

Ausgabebefehl an Drucker 

LLIST 

erstellt Programmhste auf Drucker 


LOAD od. CLOAD 

Programm von Kassette laden 

B c 

d 

n 

SAVE oder CSAVE 

Programm auf Kassette speichern 

1^ 

O s 

VERIFYoder 

LOAD? 

Programmspeicherung prüfen 

Ä w 

MERGE 

Programme vereinigen 


CDBL 

in doppelte Genauigkeit wandeln 

ö 

CSNG 

in einfache Genauigkeit wandeln 

(U 

c: 

EOF 

meldet Ende einer Datei 

o 

2 

•a 

FIX oder CINT 

in Ganzzahl wandeln 

ENSTR 

sucht String in anderem String 


POS 

enthält Position des Cursors 


STRINGS 

gibt mehrfach gleiches Zeichen aus 

, 

ON ERROR GOTO 

Anweisung bei aufgetretenem Fehler 

isl- 

ERL 

enthält fehlerhafte Zeilennummer 

FehJ 

beh 

lunc 

ERR 

enthält Fehlercode 

RESUME 

Sprung nach Fehlerbehandlung 


AUTO 

selbsttätiges Zeilennumerieren 

Ö5 

DELETE 

Zeilen löschen 

3 § 

RENUM 

neu numerieren 

11 

Ö) > 

P rt 

TRON oder 

TRAGE ON 

Trace-Betrieb einschalten 

£ £ 

TROFF oder 

TRAGE OFF 

Trace-Betrieb ausschalten 


Abb. 13: Die wichtigsten Befehle des erweiterten BASIC 
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5. Die BASIC-Dialekte 
verschiedener Computer 


Die sehr große Anzahl der BASIC-Dialekte macht einen vollstän¬ 
digen Vergleich fast unmöglich und vor allem unhandhabbar. Es 
hat darum wenig Sinn, Befehl für Befehl in großen Tabellen gegen¬ 
überzustellen, so daß in diesem Kapitel ein anderer Weg gewählt 
wurde. 


Viele der heute gebräuchlichen Dialekte gehen auf Entwicklungen 
der Firma Microsoft zurück. Sie weisen darum viele Ähnlichkeiten 
auf, aber auch immer wieder gerätespezifische Abweichungen und 
Ergänzungen. In erster Linie wird darum in diesem Kapitel erklärt, 
welche Befehle von der quasi genormten BASIC-Hochsprache 
abweichen, und welche ergänzenden Befehle es bei den einzelnen 
Computern gibt. 


Die hier besprochenen BASIC-Dialekte sind immer im Zusam¬ 
menhang mit den Computern zu sehen, auf denen sie laufen, und 
werden darum in entsprechender Anordnung behandelt. Mit Blick 
auf den Zweck dieses Buches werden in erster Linie BASIC-Ver- 
sionen besprochen, die für Home- und Personal-Computer 
bestimmt sind. BASIC-Versionen der Minicomputer und der 
Groß-EDV, die oft mit vielen sonst nicht üblichen Ergänzungsbe¬ 
fehlen arbeiten, werden nur am Rande beschrieben. 


Um die einzelnen Abschnitte übersichtlich zu halten, erwähnen wir 
darin nur das besonders, was von dem in den Abb. 1, Seite 11, und 
13, Seite 91, dargestellten Standard ab weicht. Aus Platzgründen 
mußte auch eine Beschränkung auf die für das Verstehen fremder 
Programme wichtigen Befehle vorgenommen werden; denn auf 
2 bis 3 Seiten kann nicht der Inhalt eines ganzen Handbuchs 
gezeigt werden. 
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Zur Erklärung der Befehlssyntax wird folgende Schreibweise 
verwendet (es werden jedoch nicht immer alle in den Befehlen 
möglichen Argumente eingesetzt): 

LOAD = Großbuchstaben für BASIC-Befehlswörter; 
name = Kleinbuchstaben für vom Programmierer einzu¬ 
setzende Werte„Namen usw.; 

(...) = runde Klammern als Teil von BASIC-Befehlen; 

<. . .> = eckige Klammern für wahlfrei zu verwendende 

Befehlsteile; 

a—y = für beliebige numerische Werte; 
z = für Zeilennummern; 

A$—X$ = für beliebige Zeichenketten. 

Viele Computer kennen noch BASIC-Erweiterungen mit ergän¬ 
zenden Befehlen. Sie müssen immer zusätzlich geladen werden und 
können den Lauf und die Charakteristik des ursprünglich auf dem 
Computer laufenden BASIC wesentlich verändern. Da es hier 
unzählige Varianten gibt, können sie nicht mitbehandelt werden. 

Einige etwas ältere BASIC-Versionen haben nicht für alle dort 
möglichen Arbeitsschritte eigene BASIC-Befehle, sondern verlan¬ 
gen die direkte Bedienung von Speicherstellen mit POKE und 
PEEK. Nur einige wichtige der sich hier anbietenden Möglichkei¬ 
ten können erklärt werden. 


5.1 Das ACORN BASIC 

Das auf dem BBC-Computer (ACORN B) und auf dem ACORN 
ELECTRON laufende BASIC wurde in England entwickelt, was 
rein äußerlich dadurch zum Ausdruck kommt, daß MI STAKE statt 
ERROR gemeldet wird. Im Gegensatz zum älteren BASIC des 
ACORN ATOM sind die meisten Befehle des heutigen BASIC- 
Standards vorhanden, wenn auch zum Teil mit anderer Syntax. 
Darüber hinaus gibt es aber noch viele zusätzliche Befehle, mit 
denen - ähnlich wie in Pascal - die strukturierte Programmierung 
unterstützt wird. Der Zugriff auf die Maschinensprache erfolgt in 
sonst nicht üblicher Weise. Wenn alle Möglichkeiten des ACORN 
ausgenutzt werden, sind Programme nur schwer konvertierbar. 

Variable und Variablennamen 

Zahlen variable mit 9 Stellen. * Kein Variablentyp für doppeltge¬ 
naue Rechnung. ^ Variablennamen mit beliebiger Zeichenzahl und 
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signifikanter Groß- und Kleinschreibung gestattet. * Integervaria¬ 
ble bis 2.147.483.647 zulässig. * A% bis Z% werden als residente 
Integervariable nicht gelöscht. 

Grundbefehle der BASIC-Hochsprache 

CONT-Kommando nicht wirksam; sonst keine Einschränkungen. 
* Befehlswörter dürfen nur in Großbuchstaben geschrieben wer¬ 
den. * Als Sprungziele sind auch Variable und Rechenausdrücke 
zugelassen. * Ein Hochkomma im PRINT-Befehl bewirkt Zeilen¬ 
vorschub. * Nach INPUT”text” muß ein Komma folgen. * 
RND(x) erzeugt Zufallszahlen zwischen 1 und x. * LOG(x) liefert 
Logarithmus zur Basis 10. 


Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung. ^ Nicht 
vorhandene Befehle : LINE INPUT, MOD, SWAP, INP, OUT, 
VARPTR, FIX, RESUME, EDIT. * Ausgabe auf den Drucker 
muß mit VDU 2 umgeschaltet werden. * GET und INKEY$ 
haben eine andere Bedeutung. 


Statt LOCATE (x,y) 
Statt PRINT USING 
Statt PEEK (x) 

Statt POKE x,y 
Statt LPRINT 
Statt LLIST 


> TAB(x,y) für Positionierung. 

'.% für Formatanweisung. 

■ ?x für Speicherlesen. 

* ?x=y für Speicherschreiben. 

> CtrI.B PRINT für Druckerausgabe. 

> CtrI.B LIST für gedruckte 
Programmliste. 


Wichtige zusätzliche BASIC-Befehle 

AD VAL digitalisiert analoges Signal 

ASN (w) liefert Arcussinus von w 

CHAIN (dateiname) Laden und Abarbeiten mehrerer Pro¬ 
gramme 

DEFPROGname (a,b) definiert Unterprogramm, übergibt a und b 
DEG(r) wandelt Winkel r von Bogenmaß in Grad 

DIV Operator für Ganzzahldivision 

ENDPROC Ende Unterprogramm 

EOR Operator für exclusives Oder 

EVAL (A$) berechnet Rechenausdruck im String A$ 

a=GET übergibt Code einer gedrückten Taste an a 

A$=GET$ übergibt Zeichen einer gedrückten Taste an 

A$ 


94 


INKEY (x) 
INKEY$(x) 
HIMEMx 

LOCAL x,y,x$ 
LN(x) 

OLD 

PROCname 

RAD(g) 

REPEAT...UNTIL 
TIME 
VDU a,b,c 
VPOS 


wartet x/100 s vor Übergabe des Codes 
wartet x/100 s vor Übergabe des Zeichens 
bestimmt höchsten Speicherplatz für 

BASIC 

definiert lokale Variable 
liefert natürlichen Logarithmus von x 
hebt das Kommando NEW wieder auf 
ruft Unterprogramm-Namen auf 
wandelt Winkel g von Grad in Bogenmaß 
Schleife mit Abbruchbedingung am Ende 
liefert Zeit in ‘/loo Sekunden 
führt Steuerbefehle aus 
liefert vertikale Cursorposition. 


Bildschirmaufteilung 

Mit dem Befehl MODE können 7 verschiedene Bildschirmauftei¬ 
lungen mit 20, 40 und 80 Zeichen und 25 oder 32 Zeilen in 2 bis 
16 Farben gewählt werden. Der Befehl VDU ist auch zur Definie- 
rung von Text- und Grafik-Bildschirmfenstern verwendbar. 


Bildschirmcode 

32—127 im Textmodus wie ASCII=Code. 

Im Teletext- und im Grafikmodus keine Kleinbuchstaben, dafür 
aber zusätzliche Grafiksymbole. 

Grafik- und Farbbefehle 

Hochauflösende Grafik mit bis zu 1280mal 1024 Punkten mit dem 
Koordinatennullpunkt links unten. 


MO VE x,y 
DRAWx,y 
PLOT a,x,y 
COLOUR f 
GCOL a,f, 


bewegt Grafik-Cursor auf x,y 

zeichnet Linie vom Cursor nach x,y 

zeichnet in der Art a nach x,y 

bestimmt Vorder- und Hintergrundfarbe 

ändert Farbe nachfolgender Darstellungsbefehle. 


32 beliebige Zeichen können als 8-mal-8-Matrix vom Benutzer mit 
VDU 23,a,b,c... definiert werden. 


Befehle zur Tonerzeugung 

2 beziehungsweise 4 Tonkanäle können entweder in Maschinen¬ 
sprache direkt oder mit folgenden Befehlen angesprochen werden: 

SOUND pliste erzeugt Ton entsprechend Parameterliste 
ENVELOP pliste bestimmt Hüllkurve für den Ton. 
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Befehle für die Datenspeicherung 

Für Kassetten-, Disketten- und Netzwerkspeicherung werden im 
wesentlichen die gleichen Befehle verwendet. Die Speicherung 
erfolgt in Blöcken von 256 Byte mit Prüfbyte. Dateinamen 1...10 
Buchstaben lang zulässig. Statt einer Kanalnummer ist der Name 
einer numerischen Variablen in die Befehle einzusetzen. 

a=OPENOUT (name) öffnet Datei zum Schreiben 
a=OPENIN (name) öffnet Datei zum Lesen 
INPUT #,A$ liest Datenfeld in Variable A$ 

PRINT #,A$ schreibt Variable A$ in Datei. 

Besonderheiten 

Gewöhnungsbedürftiger Zeileneditor mit COPY-Taste. * Viele 
Möglichkeiten für die Benutzung von Routinen der Maschinen¬ 
sprache auch in BASIC. * Netzwerkbetrieb in ECONET vorgese¬ 
hen. ^ MODE 7 erlaubt Anschluß an Teletext. ^ 4 Analogein¬ 
gänge mitA/D-Wandlung ansprechbar. 

5.2 Das Applesoft BASIC 

Der BASIC-Dialekt, der auf den verschiedenen Apple-Modellen 
(II, II+, Ile) läuft, ist schon einige Jahre alt und enthält darum 
nicht alle heute üblichen Befehle. Er ist aber benutzerfreundlich 
und für alle Aufgaben brauchbar. Als erste weit verbreitete BASIC- 
Version enthält Applesoft auch schon Befehle für hochauflösende 
Grafik und Farbdarstellung. 

Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. * Kein Variablentyp für doppelt¬ 
genaue Rechnung. * Variablennamen mit beliebiger Zeichenzahl, 
aber nur 2 Zeichen signifikant. 

Grundbefehle der BASIC-Hochsprache 

Nicht vorhanden: ELSE. * Für »wahr« wird +1, für »falsch« 0 
erzeugt. * Keine Einzelbitverarbeitung in BASIC. ^ Positive 
Zahlen werden ohne Leerstelle ausgegeben und gespeichert. 

Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung. ♦ Nicht 
vorhandene Befehle : INP, LINE INPUT, MOD, OUT, PRINT 
USING, SWAP, VARPTR, LPRINT, LLIST, EOF, INSTR 
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STRINGS, AUTO, RENUM. * Zur Ausgabe auf den Drucker 
muß mit PRINT ”PR #x” umgeschaltet werden. * Bei GET war¬ 
tet das Programm unbeschränkt auf eine Eingabe. 

Wichtige zusätzliche BASIC-Befehle 

FLASH läßt alle Ausgaben blinken 

IN #x leitet Eingabe auf Slot x 

INVERSE schreibt alle folgenden Ausgaben negativ 

NORMAL folui-iuic Ausgaben wieder normal 

HIMEMiZ bestimmt höchsten Speicherplatz für BASIC 

POP löscht letzte Stückeintragung 

PR #x leitet Ausgabe auf Slot x 

SPEEDx ändert Ausgabegeschwindigkeit 

WAIT a,b warten, bis an Adresse a Bitmuster b ansteht. 


Bildschirmaufteilung 

In der Grundausstattung werden je 40 Zeichen in 24 Zeilen gezeigt. 

Mit Hardwareergänzung sind 80 Zeichen/Zeilen darstellbar. * 
Mit durch POKE erreichbaren Softwareschaltern können verschie¬ 
dene Bildmodi gewählt werden. * Ebenso können mit POKE 
Bildschirmfenster bestimmt werden. * Ohne Erweiterung werden 
nur Großbuchstaben normal, invers und blinkend dargestellt. 


Bildschirmcode 

0— 31 Großbuchstaben, negativ 
32— 63 Satz- und Sonderzeichen und Ziffern, negativ 
64— 95 Großbuchstaben, blinkend 
96—127 Satz- und Sonderzeichen und Ziffern, blinkend 
128—159 Kontrollcode, keine Anzeige 
160—191 Satz- und Sonderzeichen und Ziffern, normal 
192—223 Großbuchstaben, normal 
224—255 (Kleinbuchstaben). 

Grafik- und Farbbefehle 


Niedrigauflösende Grafik wird mit GR, Text mit TEXT aufgeru¬ 
fen. Der Koordinatennullpunkt ist links unten. 

COLOR=f bestimmt Vorder- und Hintergrundfarbe 

PLOT x,y setzt Punkt in x,y 

HLIN a,e AT y zeichnet horizontale Linie von a nach e in 

Zeile y 

VLIN a,e AT x zeichnet vertikale Linie von a nach e in 

Spalte X. 
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Hochauflösende Grafik mit 192mal 280 Punkten wird mit HGR 
für Bildschirmseite 1 oder HGR 2 für Bildschirmseite 2 aufgerufen. 

HCOLOR=f bestimmt Farbe 

HPLOT x,y setzt Punkt in x,y 

HPLOT x,y TO u,v zieht Linie von x,y, nach u,v. 

Eine mit POKE-Befehlen definierte Figur kann mit DRAW abge¬ 
bildet, mit ROT rotiert und mit SCALE in der Größe verändert 
werden. 


Befehle für die Datenspeicherung 

Numerische Datenfelder können auf eine Kassette mit STOREx 
gespeichert und mit RECALx wieder gelesen werden. Als x ist der 
Feldname einzusetzen. 


Diskettenbetrieb wird durch das Apple DOS 3.3 unterstützt. Alle 
DOS-Befehle müssen dem Befehl PRINT CHR$ (4), der oft auch 
£)$=””: PRINT D$ geschrieben wird, in Anführungszeichen 
folgen. 


OPEN name, Sa, Db, Vc 


WRITE name 
READ name 
APPEND name 


öffnet Datei mit dem genannten Na¬ 
men mit Ausgang über Slot a auf Dis¬ 
kette b mit der Diskettennummer c 
veranlaßt nachfolgende PRINT-Be- 
fehle, in die Datei zu schreiben 
veranlaßt nachfolgende INPUT-Be- 
fehle, Daten von der Datei zu holen 
erlaubt, Daten an bestehende Datei 
anzufügen. 


Für Dateien mit wahlfreiem Zugriff muß noch der Parameter Ld in 
den Offnungsbefehl aufgenommen werden, wobei d die maximale 
Länge der Datensätze in Byte bestimmt. Zum Schreiben und Lesen 
in diesen Dateien wird den Befehlen Rn mit n für die Satznummer 
beziehungsweise Bm mit m für die Bytenummer angehängt. 


Besonderheiten 

Viele Ausbaumöglichkeiten durch steckbare Hardwarekarten. 
Gewöhnungsbedürftiger Editor mit CTRL-Taste zu erreichen. * 
Viele Routinen der Maschinensprache auch in BASIC zugänglich. 
* Definition von beweglichen Figuren bei hochauflösender Grafik. 
^ Schneller Wechsel zwischen 2 Bildschirmdarstellungen und 
Definition von Bildschirmfenstern über POKE mit Softwareschal¬ 


tern. 
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5.3 Das BASIC des Alphatronic PC 

Auf dem Alphatronic läuft ein modernes voll ausgebautes Micro- 
soft-BASIC, das in erster Linie für geschäftliche Nutzung gedacht 
ist und darum nur beschränkte Möglichkeiten für Grafik- und 
Tonerzeugung bietet. 

Variable und Variablennamen 

Zahlenvariable mit einfach- und doppeltgenauer Rechnung. * 
Variablennamen in Groß- und Kleinschrift bis zu 40 Stellen signifi¬ 
kant. 

Grundbefehle der BASIC-Hochsprache 

Funktionswerte werden mit doppelter Genauigkeit gerechnet. ^ 
Das Fragezeichen nach INPUT wird unterdrückt, wenn nach dem 
Text statt eines Semikolons ein Komma gesetzt wird. * RESTORE 
ist auch mit Zeilennummer zulässig. 


Befehle des erweiterten BASIC 

Keine Einschränkungen. 


Wichtige zusätzliche BASIC-Befehle 

DEF USR Festlegen der Einsprungadresse von 

Maschinenprogrammen 

ERASE Aufheben von Felddimensionierungen 

in Zeile z 

HEX$(a) wandelt a in Hexadezimalzahl 

KEY X, ”Z” belegt Taste x mit String Z 

KEY LIST erzeugt Belegungsliste der Funktions¬ 

tasten 

MID$ auch zum Einsetzen von Zeichen¬ 

ketten 

MON Aufruf des Monitors für Maschinen¬ 

sprache 

OKT$(a) wandelt a in Oktalzahl 

INPUT #n, Variablenliste liest Daten von Dateinummer n in Va¬ 
riable 

LINE INPUT #n, X$ liest bis zum CR in Variable X$ ein 

OPTION BASE bestimmt Index des 1. Feldelementes 

WAIT p,a warten, bis am Port p die in a 

gesetzten Bits = 1 sind. 
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B ildschirmaufteilung 

Je nach Einstellung mit WIDTH werden 40 oder 80 Zeichen in 
25 Zeilen gezeigt. * Festlegen eines Bildschirmfensters ist mit 
CONSOLE möglich. ^ Ausgaben im Rollmodus (bei vollem Fen¬ 
ster wird eine Zeile nach oben geschoben) oder Blattmodus (bei 
vollem Fenster wird eine Zeile überschrieben). * Blinken und 
Negativdarstellung mit dem Attribut im Colorbefehl möglich. 

Bildschirmcode 

0—31 Grafikzeichen 
32—127 ASCII-Code in deutscher Version 
128—159 Grafikzeichen 
160—223 fremdsprachliche Sonderzeichen 
224—255 Grafikzeichen. 

Grafik- und Farbbefehle 

Niedrigauflösende Grafik mit 6-Pixel-Symbolen wird mit 
GRAPH-Taste eingeschaltet. 

COLOR v,h,a bestimmt Vorder- und Hintergrundfarbe 
PRESET (x,y) setzt einen Punkt. 

Befehle für die Datenspeicherung 

Diskettenbetrieb wird ohne ein zusätzliches DOS unterstützt. 
Sequentielle und wahlfrei lesbare Datenspeicherung ist möglich. 

OPEN”l :name” FOR m öffnet Datei mit dem genannten Na- 
AS n men im Modus m als Nummer n auf 

dem Laufwerk 1 

PRINT #n, variabienliste schreibt Daten in Dateinummer n 
WRITE #n, Variablenliste wie PRINT, aber Trennzeichen 

selbsttätig gesetzt. 

Für Dateien mit wahlfreiem Zugriff muß der Aufbau der Daten¬ 
sätze in einem Befehl vorher festgelegt werden, der einen entspre¬ 
chenden Pufferspeicher bereitstellt. Es werden nur Zeichenketten 
gespeichert. 

FIELD#n,c AS X$, d AS Y$ Datensatz mit den Feldern X$, 

maximale Länge c und Y$, 
Länge d 

LSET X$ = A$ schreibt A$ linksbündig in 

Puffer X$ 
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RSETX$ = A$ 

CVI CVS CVD 
MKI$ MKS$ MKD$ 

PUT #n,s. 

GET #n,s 

LOC(n) 

LOF(n) 


schreibt A$ rechtsbündig in Puf¬ 
fer X$ 

wandeln Zahlen in Zeichenketten 
wandeln Zeichenketten wieder in 
Zahlen 

schreibt Daten vom Puffer n in 
Satz s 

holt Daten vom Satz s in den Puf¬ 
fer n 

liefert zuletzt bearbeitete Satz¬ 
nummer 

liefert Zahl der Sätze in Datei n. 


Besonderheiten 

Editierung mit Bildschirm oder Zeileneditor möglich. * Monitor 
für Maschinensprache und DOS im Grundbefehlssatz vorhanden. 
* Tastenbelegung nach deutscher Norm. * Schriftzeichen für viele 
Fremdsprachen verfügbar. 


5,4 Das Atari BASIC 

Das auf den verschiedenen Atari-Modellen laufende BASIC weicht 
in vielen Kleinigkeiten vom heute Üblichen ab. Es ist darum nicht 
ganz einfach, fremde Programme auf einem Atari-Computer zum 
Laufen zu bringen. Da das Atari-BASIC vor allem für Spielpro¬ 
gramme geschaffen wurde, bietet es viele Möglichkeiten für Grafik- 
und Tonerzeugung, die allerdings nicht sämtlich allein mit BASIC- 
Befehlen nutzbar sind. 

Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. ^ Kein Variablentyp für doppeltge¬ 
naue Rechnung. ^ Variablennamen mit beliebiger Zeichenzahl. ^ 
Maximal sind 128 Variable im Programm zugelassen. ^ Die Länge 
von Zeichenkettenvariablen muß dimensioniert werden. * String¬ 
felder werden nicht akzeptiert. 

Befehle der BASIC-Hochsprache 

Nicht vorhanden: ELSE, SPC, TAN, LEFTS, RIGHTS. * Für 
»wahr« wird +1, für »falsch« —1 erzeugt. * Das Fragezeichen statt 
PRINT wird im Listing nicht übersetzt. ^ B$ (5,10) bildet Teil¬ 
string aus B$ vom 5. bis zum 10. Buchstaben. * Vor der Verwen¬ 
dung von GET muß der Kanal zur Tastatur geöffnet werden. 
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Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung. * Keine 
Befehle für Tracebetrieb. * Nicht vorhandene Befehle : INP, 
LINE INPUT, MOD, OUT, PRINT USING, SWAP, VARPTR, 
LPRINT, LLIST, EOF, INSTR, POS, STRINGS, AUTO, 
DELETE, RENUM. 

Statt CLEAR CLR (löscht auch Dimensionierung) 

Statt CLS ^ PRINT CHR$ (125) (Bildschirmlöschen) 

Statt LOCATE x,y POSITION x,y (Cursorpositionierung) 

Statt ON ERROR GOTO TRAP (Fehlerbehandlung) 

Statt LLIST —> LIST”P” (Druckerausgabe des Programms). 


Wichtige zusätzliche BASIC-Befehle 


BEY 

COM 

DEG 

DOS 

LOCATEx,y,a 

POP 

RAD 

STATUS #k 

CLOG 

PADDLE 

PTRIG 

STICK 


Abschalten von BASIC 

entspricht dem DIM-Befehl 

nachfolgende Winkeleingaben in Grad 

zeigt DOS Menü und startet DOS 

übergibt Zeichen in x,y an Variable a 

löscht letzte Eintragung im Stapelspeicher 

nachfolgende Winkeleingaben in Radian 

meldet Status Kanal k nach letzter Operation 

liefert dekadischen Logarithmus 

liefert Position des Drehreglers 

meldet, wenn Taste des Steuerknüppels gedrückt 

liefert Position des Steuerknüppels. 


Bildschirmaufteilung 

Im Textmodus werden je 40 Zeichen in 24 Zeilen gezeigt. * Mit 
dem GRAPHICS-Befehl lassen sich verschiedene andere Darstel¬ 
lungen wählen. * Ein Bildschirmfenster für Texte ist auch bei 
einigen Grafikmodi möglich. 


Bildschirmcode 

Textmodus 

0— 31 Grafiksymbole 

32—127 wie ASCII-Code, internationale Version 
128—255 wie 0—127, negativ. 

Im Grafikmodus kann mit POKE-Befehlen zwischen 2 Zeichensät¬ 
zen umgeschaltet werden. 
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Grafik- und Farbbefehle 

Verschiedene Arten der Grafikdarstellung werden mit GRA¬ 
PHICS X angewählt. * Bis 92mal 320 Punkte Auflösung bei 4 aus 
255 Farben möglich. * Koordinatennullpunkt links oben. 
COLORx bestimmt Farbregister für nachfolgende Befehle 
PLOT x,y setzt Punkt in x,y 
DRAWTO x,y zeichnet Linie nach x,y 
SETCOLOR bestimmt Farbe und Helligkeit im Farbregister. 

Sprites werden durch Verändern einzelner Zeichen im Zeichensatz 
und Speicherung in einer Displayliste in einem besonderen Micro- 
prozessor erzeugt. Programmierung weitgehend in Maschinen¬ 
sprache. 


Befehle zur Tonerzeugung 

Für 3+1 Tonkanäle kann getrennt mit SOUND die Tonhöhe, das 
Rauschen und die Lautstärke programmiert werden. Die Tondauer 
ist durch eine Schleife zu bestimmen. 


Befehle für die Datenspeicherung 

Diskettenbetrieb wird durch das residente BASIC unterstützt. 
Erfolgt der Datenverkehr nicht in üblicher Weise mit der Tastatur 
und dem Bildschirm, ist ein Datenkanal zur Diskette zu öffnen. 
0PEN,m,0,”g:name” öffnet Datei mit dem genannten Namen 
auf dem Kanal n in der Betriebsart m auf 
dem Gerät g 

PRINT #k:”daten’’ schreibt Daten auf Datei in Kanal k 
INPUT #k: x$ liest Daten von Kanal k in Variable X$ 

GET #k,b liest Code eines Byte in Variable b 

PUT #k,a speichert a als Byte. 


Dateien mit wahlfreiem Zugriff werden nur bedingt unterstützt, 
indem der Dateizeiger mit POINT auf ein bestimmtes Byte in 
einem bestimmten Sektor gesetzt werden kann. 


Besonderheiten 

Tabelle der verwendeten Variablennamen wird zusammen mit dem 
Programm abgespeichert. * Bildschirmeditor vorhanden. ^ Nur 
Zeilennummern bis 32767 zulässig. * Viele Möglichkeiten für gra¬ 
fische Farbdarstellung und Tonerzeugung, aber komplizierte 
Syntax. 
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5.5 Das BASIC des CASIO FP-200 


Wie bei anderen Aktentaschencomputern läuft auch auf dem 
CASIO, FP-200 ein modernes, gut ausgebautes BASIC. Zusätzlich 
können allein oder auch zusammen mit BASIC die Befehle eines 
Tabellen-Kalkulationsprogramms verwendet werden, um Daten in 
Form einer Matrix darzustellen, zu verarbeiten oder zu speichern. 

Variable und Variablennamen 

Zahlenvariable mit einfach- und doppeltgenauer Rechnung. * 
Variablennamen in Groß- und Kleinschrift bis zu 255 Stellen signi¬ 
fikant. 

Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen. * RESTORE ist auch mit Zeilennummer 
zulässig. 

Statt FRE(x) —> SYSTEM (freier Speicherraum). 

Befehle des erweiterten BASIC 

Keine Einschränkungen. 


Wichtige zusätzliche BASIC-Befehle 


DATES 

DEFUSR 

FRAC(a) 

KEYx,”Z” 

KEY LIST 
LGT(a) 

OPTION BASE 
TIMES 


enthält Datum 

Festlegen der Einsprungadresse von Maschi¬ 
nenprogrammen 

liefert Bruchteil der Dezimalzahl a 
belegt Taste x mit String Z 
erzeugt Belegungsliste der Funktionstasten 
liefert dekanischen Logarithmus von a 
bestimmt Index des 1. Feldelementes 
enthält Zeit. 


Außer diesen auch sonst üblichen Zusatzbefehlen bietet der FP-200 
die Möglichkeit, auf einfache Weise statistische Auswertungen zu 
machen. 

STAT CLEAR Aufruf für statistische Rechnungen 
STAT X Eingabe von Werten zur Verarbeitung 

CNT zählt eingegebene Werte 
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SUMx 

MEANx 

SDx 


liefert Summe der x-Werte 
liefert Mittelwert der x-Werte 
liefert Standardabweichung. 


Bildschirmaufteilung 

8 Zeilen mit je 20 Zeichen und 64mal 160 Punkte Grafik können 
gemischt erzeugt werden. * Koordinatennullpunkt links oben. 


Bildschirmcode 

0—31 Grafikzeichen 
32—127 ASCII-Code, internationale Version 
128—159 Grafikzeichen 
160—223 Leerstellen 
224—255 Grafikzeichen. 


Grafikbefehle 
DRAWx,y 
DRAWx,y-u,v 
DRAW-x,y 
QUAD (x,y)-(u,v) 


setzt Punkt in x,y 
zieht Linie von x,y nach u,v 
zeichnet vom letzten Punkt nach x,y 
zeichnet Rechteck mit Eckpunkten x,y, u,v. 


Befehle für die Datenspeicherung 

Zu speichernde Daten werden mit CETL-Kommandos in eine 
Tabelle geschrieben, in der auch Sortiervorgänge und Additionen 
durchgeführt werden können. Die Matrix kann mit einem einfa¬ 
chen Kommando auf eine Kassette oder Diskette geschrieben und 
von dort wieder gelesen werden. 

Arbeitet der Computer in CETL, kann von dort aus ein BASIC- 
Programm angerufen werden, das den Inhalt einzelner Matrixfelder 
verarbeitet und das Resultat zurückgibt. 

OPEN”l:name” FOR m AS n öffnet Datei mit dem genannten 

Namen im Modus m als Num¬ 
mer n auf dem Laufwerk 1 

PRINT #n, variabienliste schreibt Daten in Dateinummer n 

INPUT #n, variabienliste liest Daten von Dateinummer n 

in Variable 

Für Dateien mit wahlfreiem Zugriff muß der Aufbau der Daten¬ 
sätze in einem Befehl vorher festgelegt werden, durch den ein ent¬ 
sprechender Pufferspeicher bereitgestellt wird. Es werden nur Zei¬ 
chenketten gespeichert. 
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FIELD #n,c AS X$, d AS Y$ 

LSETX$ = B$ 

RSET X$ = B$ 

CVI CVS CVD 
MKI$ MKS$ MKD$ 

PUT #n,s 

GET # n, s 

LOC(n) 

LOF(n) 


Datensatz mit den Feldern X$, 
maximale Länge c und Y$, 
Länge d 

schreibt B$ linksbündig in 
Puffer X$ 

schreibt B$ rechtsbündig in Puf¬ 
fer X$ 

wandeln Zahlen in Zeichenketten 
wandeln Zeichenketten wieder in 
Zahlen 

schreibt Daten vom Puffer n in 
Satz s 

holt Daten vom Satz s in den Puf¬ 
fer n 

liefert zuletzt bearbeitete Satz¬ 
nummer 

liefert Zahl der Sätze in Datei n. 


Besonderheiten 

Bis zu 10 Programme und/oder Tabellen können im Computer 
gespeichert und bei Bedarf zum Laufen gebracht werden. 


5.6 Die BASIC-Dialekte 

der Commodore Computer 

Das schon etwas ältere Commodore-BASIC kennt nicht alle 
Befehle, die moderne, voll ausgebaute Versionen besitzen. Für viele 
Programmieraufgaben muß mit POKE und PEEK in den Arbeits¬ 
speicher eingegriffen werden. Da bei den verschiedenen Commo- 
dore-Modellen unterschiedliche Adressen gelten, sind deren Dia¬ 
lekte nicht voll kompatibel, auch wenn die BASIC-Befehlswörter 
im wesentlichen übereinstimmen. Eine große Anzahl von Zusatz¬ 
modulen zur Erweiterung des Commodore-BASIC im Angebot. 


Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. * Kein Variablentyp für doppeltge¬ 
naue Rechnung. * Variablennamen mit beliebiger Zeichenzahl, 
aber nur 2 Zeichen signifikant. 
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Grundbefehle der BASIC-Hochsprache 

Nicht vorhanden: ELSE. Sonst keine Einschränkungen. * Bei älte¬ 
ren Dialekten erfolgt Programmabbruch, wenn nach INPUT nur 
die RETURN-Taste betätigt wird. 

Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung und zur 
Fehlerbehandlung, Nicht vorhandene Befehle : INP, LINE 
INPUT, MOD, OUT, PRINT USING, SWAP, VARPTR, 
LPRINT, LLIST, FIX, INSTR, STRINGS, AUTO, DELETE, 
RENUM, TRON, TROFF * Zur Ausgabe auf den Drucker muß 
der Kanal mit OPEN 1,4,7 geöffnet werden. 

Statt CLS ^ PRINT CHR$ (147) (Bildschirmlöschen) 

Statt EOF ^ Status abfragen (Aus-/Eingabe-Status). 


Wichtige zusätzliche BASIC-Befehle 

CMD X leitet Ausgabe auf unter log.Nr. x geöffnetes Gerät 

STATUS enthält Status der letzten Ein-/Ausgabeoperation 

TIME enthält Zeit in ‘/w Sekunden 

TIMES enthält Uhrzeit als Zeichenkette 

WAIT x,a Warten, bis an der Adresse x das Bitmuster a ansteht. 


Bildschirmaufteilung 

Die verschiedenen Commodore-Modelle haben unterschiedliche 
Bildschirmaufteilungen. * In jede Position können Buchstaben 
oder Grafikzeichen gesetzt werden. * Hochauflösende Grafik 
durch zusätzliche Hard- und Software geboten. 


Modell 

Zeilen x Zeichen Adressen Bildschirmspeicher 

4000 

25X40 

32 768-33 767 

8000 

25X80 

32 768-34 767 

VC-20 

23X22 

7 680- 8 185 

C-64 

25x40 

1 024- 2 023 

Bildschirmcode 



1 . Zeichensatz (Grafik) 

2. Zeichensatz (Text) 

0- 31 

wie ASCII-Code 64—95 

wie ASCII-Code 96—127 

32- 63 

wie ASCII-Code 32—63 

wie ASCII-Code 32-63 

64- 95 

Grafikzeichen 

wie ASCII-Code 64—95 

96—127 Grafikzeichen 

Grafikzeichen 

128-255 

negativ wie 0—127 

negativ wie 0—127 
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Grafik- und Farbbefehle 

Alle Commodore-Modelle erlauben PRINT- und POKE-Grafik 
mit den Zeichen des Bildschirmcodes. 

Der VC-20 und der C-64 bieten Farbdarstellung, wobei die Farb¬ 
wahl getrennt für Vorder- und Hintergrund durch POKE-Befehle 
in den Farbspeichern erfolgt. Hierfür werden verwendet: 

beim VC-20 die Adressen 38400—38905, 
beim C-64 die Adressen 55296—56295. 

Mit POKE-Befehlen können Zeichen in einer 8-mal-8-Matrix pro¬ 
grammiert und auch in Bewegung dargestellt werden. 

Beim C-64 lassen sich mit POKE-Befehlen in einer 21-mal-24- 
Matrix Sprites definieren. Sie können mehrfarbig erscheinen, 
bewegt und in der Größe geändert werden. 


Befehle für die Tonerzeugung 

Mit POKE-Befehlen sind beim C-64 3 Tongeneratoren einzustel¬ 
len, wodurch mehrstimmige Musikerzeugung möglich ist. Die Pro¬ 
grammierung ohne ein unterstützendes Betriebsprogramm ist aller¬ 
dings schwierig, da es keine Tonbefehle in BASIC gibt. 


Befehle für die Datenspeicherung 

Periphere Geräte müssen immer mit dem OPEN-Befehl in der 
Form 


OPEN log.dateinr,gernr,sek,adr,”lfwerknr:name,typ,modus” 

geöffnet und mit CLOSE #nr wieder geschlossen werden. 

Diskettenbetrieb wird durch verschiedene DOS-Versionen unter¬ 
stützt, wobei erst ab Version 4.0 wahlfrei lesbare Dateien aufgebaut 
werden können. Es gelten folgende Anweisungen: 


PRINT #n,x,A$ 
INPUT #n,x,A$ 

GET #n,A$ 
PUT #n, A$ 
APPEND #n,x 


Variable sequentiell in Datei n speichern 
Daten in Datei n lesen und Variable zu¬ 
weisen 

liest einzelnes Zeichen von der Datei n 
schreibt ein Zeichen von A$ in Datei n 
schreibt Variable x an das Ende von 
Datei n. 
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Bei der DOS-Version 4.0 wird der etwas einfachere Befehl 
DOPEN verwendet, der es erlaubt, als letzten Parameter hinter L 
die Satzlänge für eine wahlfrei lesbare Datei vorzugeben. 

RECORD #n,s ,<b> ermöglicht nachfolgendem Schreib- oder 
Lesebefehl, auf Satz s und Byte b zuzu¬ 
greifen. 

Besonderheiten 

Viele Ausbaumöglichkeiten durch Hard- und Software-Erweite¬ 
rungen. * Bildschirmeditor mit gewissen Einschränkungen. * 
Viele Routinen der Maschinensprache auch in BASIC zugänglich. 
* Auf der Tastatur eingegebene Steuerbefehle können in einem 
String im Programm abgespeichert werden. Sie werden dann im 
Listing als Negativzeichen gedruckt. * Viele Möglichkeiten, die 
die Hardware der Computer bietet, sind nur durch POKE-Befehle 
nutzbar. 


5.7 Das BASIC des Dragon 

Auf dem Dragon läuft ein modernes, recht gut ausgebautes BASIC, 
das auch sehr wirksam BASIC-Befehle für farbige Grafik und für 
Tonerzeugung enthält. Es ist allerdings wohl in erster Linie für die 
Programmierung von Spielen und weniger für kommerzielle Nut¬ 
zung gedacht. 


Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. * Kein Variablentyp für doppeltge¬ 
naue Rechnung. * Variablennamen mit beliebiger Zeichenzahl, 
aber nur die beiden ersten Zeichen signifikant. 


Befehle der BASIC-Hochsprache 

Keine Einschränkungen. * Statt REM auch ein Apostroph zuläs¬ 
sig. * RND(a) liefert Zufallszahlen von 1 bis a. * Platz für den 
Zeichenspeicher muß mit CLEAR reserviert werden. 


Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung. * Nicht 
vorhandene Befehle : INP, MOD, OUT, SWAP, AUTO. 
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Wichtige zusätzliche BASIC-Befehle 

AUDIO schaltet Tonausgabe des Recorders ein oder aus 

CLOADM 


”name” 
DEFUSRn 
EXEC adr 

DEG 

HEX$(a) 

JOYSTK(a) 

MOTOR 

SKIPF”name” 

TIMER 


lädt Maschinenprogramm name 
bestimmt Einsprungadresse für Unterprogramm n 
überträgt Steuerung ab adr an Maschinenpro¬ 
gramm 

nachfolgende Winkeleingaben in Grad 
liefert a als Hexadezimalzahl 
liefert Stellung des Steuerknüppels 
schaltet Motor des Recorders ein oder aus 
spult Kassette bis name 
enthält Stellung der Computeruhr. 


Bildschirmaufteilung 

Im Textmodus werden je 32 Zeichen in 16 Zeilen gezeigt. * Mit 
dem SCREEN-Befehl lassen sich 4 andere Darstellungen mit höhe¬ 
rer Auflösung (bis zu 192 X 256 Punkte), aber dafür weniger Far¬ 
ben wählen. 


Bildschirmcode 

0— 31 Grafikzeichen 

32—127 wie ASCII-Code, internationale Version 
128—255 Grafikzeichen. 


Grafik- und Farbbefehle 

Neben der PRINT- und POKE-Grafik im Textmodus wird Farb¬ 
grafik verschiedener Auflösung mit BASIC-Befehlen unterstützt. 
* Koordinatennullpunkt links oben. 

PCLEARx 


PCOPYaTOb 

COLORv,h 

PSETx,y,f 

PRESET x,y 

LINE(x,y,)-(u,v) 

DRAW”string” 

CIRCLE (x,y),r 
PAINT (x,y),f,h 


reserviert bis zu 8 Bildschirmseiten für 
Grafik 

kopiert Bildschirmseite a nach b 
wählt Vorder- und Hintergrundfarbe 
setzt Punkt bei x,y in Farbe f 
löscht Punkt bei x,y 
zeichnet Linie von x,y nach u,v 
zeichnet entsprechend der Anweisung 
in String 

zeichnet Kreis in x,y mit Radius r 
füllt Fläche mit Farbe f bis zur Farbe h. 
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Der LINE-Befehl erlaubt mit weiteren Parametern auch das Zeich¬ 
nen von Rechtecken, der CIRCLE-Befehl das Zeichnen von El¬ 
lipsen. 

Der DRAW-Befehl erlaubt das Zeichnen von Figuren beliebiger 
Form und Größe mit Hilfe einfacher in einer Zeichenkette gespei¬ 
cherter Kommandos. 

Mit PUT können Teile einer Bildschirmdarstellung in einer Matrix 
gespeichert und mit GET wieder aufgerufen werden. 

Befehle zur Tonerzeugung 

Der Dragon erlaubt die Einblendung von Tonaufzeichnungen auf 
einer Kassette in BASIC-Programme mit Hilfe der AUDIO- und 
MOTOR-Befehle. Darüber hinaus bestehen Befehle zur Erzeu¬ 
gung einfacher Töne und Geräusche. 

SOUND h,d erzeugt Ton der Höhe h und Dauer d 

PLAY”string” wandelt Inhalt einer Zeichenkette in 

Töne. 

Befehle für die Datenspeicherung 

Zur sequentiellen Datenspeicherung muß immer ein Kanal geöffnet 
werden. Der Kanal für den Kassettenrecorder hat die Nummer —1. 

OPEN”m”, #n, ”name” öffnet Datei mit dem genannten Namen 
auf dem Kanal n in der Betriebsart m 
PRINT #n,a,b,c schreibt Daten auf Datei in Kanal n 

INPUT #n,a,b,c liest Daten von Kanal n in Variable. 

Besonderheiten 

Einfach, ohne POKE-Befehle zu programmierende Farbgrafik mit 
guter Auflösung. * Einblendung von Tonaufzeichnungen auf einer 
Kassette in ein BASIC-Programm. * Einfache Übernahme einer 
Grafik als Matrix in ein Feld, das dann wieder an beliebige Stelle 
des Bildschirms gesetzt werden kann. 


5.8 Das BASIC 

der EPSON Computer 

Das auf den verschiedenen EPSON-Computern laufende BASIC 
ist eine moderne, gut ausgebaute Version. Bis auf einige Spezialbe¬ 
fehle entspricht das BASIC des EPSON Handhelt-Computers 
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HX-20 dem des Bürocomputers QX-10, der allerdings mit seinem 
MFBASIC noch viele weitere Möglichkeiten, insbesondere für 
Grafik, bietet. 


Variable und Variablennamen 

Zahlenvariable mit einfach- und doppeltgenauer Rechnung. * 
Variablennamen in Groß- und Kleinschrift bis zu 255 Stellen zuläs¬ 
sig, von denen 16 signifikant sind. 


Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen. * RESTORE ist auch mit Zeilennummer 
zulässig. * Leerstellen vor und nach Befehlswörtern notwendig. 

Befehle des erweiterten BASIC 

Keine Einschränkungen. 


Wichtige zusätzliche BASIC-Befehle 


COPY 

DATE$ 

DAY 

DEFUSRx 

ERASEa 

HEX$(a) 

KEY a,”X” 

KEY LIST 
LOGIN X 
OKT$(a) 
OPTION BASE 
STAT 
TABCNT 
TIMES 
TITLE”n” 


Ausdruck der Anzeige auf eingebautem 

Drucker 

enthält Datum 

enthält Wochentag 

Festlegen der Einsprungadresse für Maschi¬ 
nenprogramm 

Aufheben von Felddimensionierungen 
wandelt a in Hexadezimalzahl 
belegt Taste a mit Zeichenkette X 
erzeugt Belegungsliste der Funktionstasten 
wählt Programm aus dem Menü (HX-20) 
wandelt a in Oktalzahl 
bestimmt Index des 1. Feldelementes 
meldet Speicherbedarf (HX-20) 
enthält Stand des Bandzählers (HX-20) 
enthält Zeit 

gibt geschriebenem Programm den Namen n 
(HX-20) 


WHILE... WEND Schleifenbefehle 

WIDTH X bestimmt Breite des virtuellen Bildschirms 

WIND X spult Band an Zählerposition x (HX-20) 

XOR Operator für exclusiv oder. 


Bildschirmaufteilung 

Der HX-20 zeigt in 4 Zeilen je 20 Zeichen und erlaubt Grafik mit 
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32mal 120 Punkten Auflösung. * Koordinatennullpunkt links 
oben. * Der QX-10 gibt bis zu 80 Zeichen pro Zeile aus und bietet 
Grafikdarstellung mit 400 X 640 Punkten. 

Bildschirmcode 

0—127 ASCII-Code, internationale Version 
128—255 Grafikzeichen. 


Grafikbefehle des HX-20 


PSET(x,y) 
PRESET(x,v) 
LINE(x,y)-(u,v) 
POINT x,y 
LOCATES X 


setzt Punkt in x,y 
löscht Punkt in x,y 
zeichnet (löscht) Linie x,y nach u,v 
prüft, ob Punkt in x,y gesetzt ist 
wählt Bildausschnitt. 


Befehle für die Datenspeicherung beim HX-20 

Durch BASIC wird die sequentielle Datenspeicherung auf dem 
eingebauten Mikrorecorder oder einem extern angeschlossenen 
Bandgerät und die wahlfreie lesbare Speicherung in einer RAM- 
Datei unterstützt. Für die Kassettenspeicherung gelten folgende 
Befehle: 


OPEN”m”,#n,”ger:name” 

PRINT #n, variablenliste 
INPUT#n, Variablenliste 

CLOSE#n 


öffnet Datei mit dem genannten 
Namen im Modus m als Num¬ 
mer n auf dem mit ger angespro¬ 
chenen Gerät 

schreibt Daten in Dateinummer n 
liest Daten von Dateinummer n 
in Variable 
schließt Datei n. 


Für Dateien mit wahlfreiem Zugriff im RAM muß der Aufbau der 
Datensätze im DEFFIL-Befehl vorher festgelegt werden. Ganz¬ 
zahlvariable benötigen 2 Byte, einfachgenaue 4 Byte und doppelt¬ 
genaue Variable 8 Byte. Als letztes kann eine Zeichenkettenvariable 
im Datenfeld stehen. Die Anfangsadresse jeder Datei muß als rela¬ 
tive Adresse im RAM, also bei der ersten Datei mit 0 beginnend, 
eingesetzt werden. Es gelten folgende Befehle: 


DEFFIL l,rel.adr. 
PUT% s,variablenliste 
GET% s,variablenliste 
LOF(n) 


definiert Datensätze der Länge 1 
schreibt Daten in Satz s 
holt Daten vom Satz s in Variable 
liefert Zahl der Sätze in Datei n. 
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Datenspeicherung auf dem QX-10 

Die Befehle für die Datenspeicherung beim QX-10 entsprechen 
dem Standard des Microsoft-BASIC 80, wie beim IBM-PC be¬ 
schrieben. 

Besonderheiten 

Datenübertragung vom HX-20 zum QX-10 ist über die serielle 
Schnittstelle möglich. * Die Flüssigkristallanzeige stellt nur einen 
Teil des virtuellen Bildschirms dar. * Das MF-BASIC des QX-10 
bietet eine Auswahl besonderer, auch vergrößerter, Schriften für 
Bildschirmdarstellung und Druck. 

5.9 Das Hewlett-Packard BASIC 
der Serie 80 

Das auf den älteren H-P-Computern laufende BASIC stimmt in 
vielen Einzelheiten nicht mit dem heute üblichen Standard überein, 
hat aber einen großen Befehlssatz, der alle im technischen und 
wissenschaftlichen Bereich liegenden Aufgaben gut unterstützt. 
Sehr vielfältig sind auch die Möglichkeiten für die Erstellung von 
technischen Grafiken nur mit BASIC-Befehlen. 

Variable und Variablennamen 

Zahlenvariable mit einfach- (SHORT = 5 Stellen) und doppeltge¬ 
nauer (REAL = 12 Stellen) Rechnung. * Variablennamen in Groß¬ 
oder Kleinschrift bis zu 31 Zeichen signifikant. * Variablennamen 
müssen durch mindestens ein Leerzeichen von numerischen Kon¬ 
stanten und Befehlswörtern getrennt sein. 

Grundbefehle der BASIC-Hochsprache 

Zeichenketten mit mehr als 10 Zeichen müssen mit der Länge in der 
ersten Dimension dimensioniert werden. * # und <> als Un¬ 
gleichoperator. * Mehrfachzuweisung in der Form a,b,c = 4 zuläs¬ 
sig. * Ausrufungszeichen anstelle von REM erlaubt. * Programm 
muß mit END oder STOP abgeschlossen werden. * RESTORE 
auch mit Zeilennummer. * Außer DIM auch REAL, SHORT, 
INTEGER zum Dimensionieren von Feldern. * Kein LEFT$ und 
RIGHTS. * Statt REM auch ! vor Kommentaren. 

Statt CLEAR ^ SCATCH (Variable löschen) 

Statt STOP ^ PAUSE (Programm anhalten) 

Statt PRINT —> DISP (Bildschirmausgabe) 
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Statt ASC (X$) 
Statt STR$(x) 
Statt : 

Statt MIDI 


^ NUM (X$) (Funktion für Codewert) 
VAL$(x) (Wandlung Zahl in String) 
—> \ (Befehlstrennung) 

^ STR (Teilstringbildung). 


Befehle des erweiterten BASIC 

Nicht vorhandene Befehle: MOD, LINE INPUT, SWAP, LLIST, 
GET, IMP, OUT, PEEK, POKE, VARPTR. 


Statt CLS 
Statt DEFDBL 
Statt DEFINT 
Statt DEFSNG 
Statt LPRINT 
Statt FIX(x) 
Statt INSTR 
Statt POS 
Statt SAVE 
Statt MERGE 


—> CLEAR (Bildschirm löschen) 

^ REAL (Definition als doppeltgenau) 
—> INTEGER (Definition als Ganzzahl) 
—> SHORT (Definition als einfachgenau) 
^ PRINT (Druckerausgabe) 

^ IP(x) (Nachkommastellen abtrennen) 
—> POS (Suchen in einem String) 
CURSOR (Stellung des Cursor) 

^ STORE (Programmspeichern) 

^ CHAIN (Programme vereinigen). 


Die Positionierung von Ausgaben wird im IMAGE-Befehl vorbe¬ 
reitet und erfolgt dann mit PRINT USING. 


Wichtige zusätzliche BASIC-Befehle 


DATE 

DEG 

DIV: oder \ 

EXOR 

FP(x) 

LGT(x) 

OPTION BASE 
PRINT ALL 
PRINTER IS 
RAD 

SET TIME 

TIME 

WAITx 


enthält Datum 

schaltet Computer in Grad-Modus um 
Operand für Ganzzahldivision 
logische exclusiv-oder-Verknüpfung 
liefert Dezimalanteil von x 
liefert dekadischen Logarithmus von x 
bestimmt Index des 1. Feldelementes 
schaltet alle Ausgaben auf den Drucker 
bestimmt Ausgabe und Zeilenlänge 
schaltet Computer in Rad-Modus 
Anweisung zum Setzen von Zeit und 
Datum 
enthält Zeit 

X Millisekunden warten. 


Bildschirmaufteilung 

Anzeige von 16 oder 24 Zeilen mit je 80 Zeichen mit PAGESIZE 
wählbar aus einem Speicher mit 54 Zeilen. * Mit GRAPH oder 
GRAPHALL Umschaltung auf Grafik-Modus mit dem Nullpunkt 
links unten. 
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Bildschirmcode 

0—127 ASCII-Code, internationale Version 
128—255 wie 0—127, aber negativ. 


Grafikbefehle 

Das H-P-BASIC enthält komfortable Befehle für grafische Dar¬ 
stellung, insbesondere von Funktionen und Kurven, auf dem Bild¬ 
schirm oder einem angeschlossenen Plotter. Die meisten Befehle 
können mit verschiedenen Parametern verwendet werden. 


AXIS 

DRAW 

FRAME 

GRID 

LIMIT 

LINE 

LOCATE 

MOVE 

PEN 

PDIR 

PLOT 

SCALE 


zeichnet Achsen und deren Beschriftung 

zeichnet eine Linie 

zeichnet einen Rahmen 

zeichnet ein Gitternetz 

bestimmt Abbildungsgrenze 

bestimmt Art der zu zeichnenden Linie 

bestimmt Zeichengrenze 

bewegt Stift ohne Zeichnen 

Auswahl des Farbstiftes für Plotter 

bestimmt Plotrichtung 

zeichnet eine Linie 

definiert min und max von x und y. 


Befehle für die Datenspeicherung 

Datenspeicherung in Datensätzen von 256 Byte mit sequentiellem 
oder wahlfreiem Zugriff ist programmierbar. 


ASSIGN#n TO ”name” 

PRINT#n: Variablenliste 
READ#n: variabienliste 

LINE INPUT#n,XS 


öffnet Datei mit dem genannten Na¬ 
men als Nummer n 
schreibt Daten in Dateinummer n 
liest Daten von Dateinummer n in 
Variable 

liest bis zum CR in Variable XS ein. 


Bei Dateien mit wahlfreiem Zugriff werden die gleichen Befehle 
verwendet, nur muß in die Schreib- und Lesebefehle nach der 
Dateinummer die Satznummer eingesetzt werden. 


Besonderheiten 

Schrittweiser Lauf der Programme im STEP-Betrieb möglich. * 
Vielseitige Formatierung mit IMAGE vor PRINT USING. * 
Möglichkeit zum Abspeichern einer Bildschirmgrafik. * Einbin¬ 
dung von Interrupts in BASIC-Programme möglich. * Einfaches 
Arbeiten im Direktbetrieb. * Label als Sprungziele zugelassen. 
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5.10 Das BASIC 

der IBM Personal-Computer 

Das BASIC der IBM Personal-Computer und das der dazu kompa¬ 
tiblen Geräte entspricht weitgehend dem BASIC 80 von Microsoft 
mit zusätzlichen Befehlen für Datenfernübertragung, Grafik, Farbe 
und Tonerzeugung. Durch Segmentierung können bis 640 KByte 
im Hauptspeicher verwaltet werden. 

Variable und Variablennamen 

Zahlenvariable in einfacher und doppelter Genauigkeit. * Varia¬ 
blennamen in beliebiger Länge mit 40 signifikanten Zeichen. 

Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen * Statt REM auch Apostroph zulässig. * 
Leerstellen oder Satzzeichen vor und nach Befehlswörtern erfor¬ 
derlich. 

Befehle des erweiterten BASIC 

Keine Einschränkungen. 


Wichtige zusätzliche BASIC-Befehle 


CHAIN dateinamen 
COM(x) ON/OFF/ 
STOP 

COMMON var. liste 
DATES 

DEF SEG adresse 
ERASE 

KEYON/OFF/LIST 
KEY x,X$ 

KEY(n) ON/OFF 

LOCATE s,z 

MOTOR 

OPTION BASEx 

SCREEN 

TIMES 

WEND 

WHILE ausdruck 
XOR 

&H &0 


ruft Programm auf und übergibt Variable 
startet, beendet, stoppt Datenfernverarbei- 
tung 

übergibt Variable an Programm 
enthält Datum als mm,dd,jjjj Zeichenkette 
definiert Segment des Hauptspeichers 
löscht Dimensionierung von Feldern 
zeigt oder listet Inhalt der Funktionstasten 
setzt Taste x auf Wert X$ 
schaltet Funktionstasten ein und aus 
setzt Cursor auf Spalte s und Zeile z 
schaltet Kassettenrecordermotor 
setzt Wert für kleinstes Feldelement 
bestimmt Bildschirmanzeige 
enthält Uhrzeit als hh:mm:ss Zeichenkette 
schließt WHILE-Schleife 
Schleife läuft, solange Ausdruck wahr ist 
Operator für exclusiv oder 
Vorzeichen für Hex- beziehungsweise Ok¬ 
talzahlen. 
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Bildschirmaufteilung 

Text Je nach Einstellung mit WIDTH in 24 Zeilen mit 40 oder 
80 Zeichen. * Zusätzlich eine Statuszeile möglich, die nicht 
gelöscht wird. ^ 4 oder 8 Bildschirmseiten können gespeichert 
werden. 

Grafik Mittlere Auflösung 320 X 200 Punkte mit 4 Farben. * 
Hohe Auflösung 640 X 200 Punkte mit 2 Farben. * Koordinaten¬ 
nullpunkt (1,1) links oben. 


Bildschirmcode 

0—31 Steuercode und einige Grafikzeichen 
32 — 127 wie ASCII-Code, internationale Version 
128—255 Grafikzeichen. 

Grafik- und Farbbefehle 

CIRCLE (x,y),r zeichnet Kreis mit Radius r in x,y 
COLOR v,h,r bestimmt Farben für Vordergrund (v), Hinter¬ 
grund (h) und Rahmen (r) 

DRAW X$ zeichnet Figur entsprechend X$ 

LINE (x,y)—(u,v) zeichnet Linie von x,x nach p,q 
PAINT (x,y), f,h füllt ab x,y bis Grenze h mit Farbe f 
PRESET (x,v) setzt Punkt in x,y in Hintergrundfarbe 

PSET (x,y) setzt Punkt in x,y in Vordergrundfarbe 

GET (x,y)—(u,v), f speichert Bildschirmbereich im Feld f 
PUT (x,y), f schreibt die im Feld f gespeicherte Grafik. 

Befehle zur Tonerzeugung 

BEEP erzeugt einen kurzen Ton 

SOUND f,d erzeugt Ton der Frequenz f mit der Dauer d 

PLAY X$ spielt Musik entsprechend Zeichenkette X$. 

Befehle für die Dateiverwaltung 

Das Betriebssystem PC-DOS (MS-DOS) unterstützt sequentielle 
und wahlfrei lesbare Dateien. 

Schreibweise des Dateinamens: ”laufwerk:name,erg” 

Laufwerk=A oder B, Name 8 Zeichen, Ergänzung 3 Zeichen. 

OPEN”name” FOR OUTPUT AS #n Schreiben der sequentiel¬ 
len Dateinummer n 
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OPEN”0”, #n, ”name” 
OPEN^name” FOR INPUT AS #n 

OPEN”r, #n, ”naine” 

PRINT# PRINT# USING WRITE 
INPUT# LINE INPUT# INPUT$ 


dito 

Lesen der sequentiellen 
Dateinummer n 
dito 

Schreiben in Datei 
Lesen aus einer Datei. 


Für wahlfrei lesbare Dateien muß die Datensatzlänge im OPEN- 
Befehl und der Aufbau der Datensätze in einer Feldeinteilung fest¬ 
gelegt werden, wodurch ein Pufferspeicher reserviert wird. Es wer¬ 
den nur Zeichenketten gespeichert. 


OPEN”name” AS #n 
LEN=1 

OPEN”R”, #n, "name”,! 
FIELD #n, 25 AS Y$,... 
LSETY$ = B$ 

RSETY$ = B$ 

MKI$ MKS$ MKD$ 
CVI CVS CVD 


PUT #n,s 
GET #n, s 
LOC(n) 

LOF(n) 

BLOAD BSAVE 


öffnen wahlfreie Datei mit Satz¬ 
länge 1 

dito 

reserviert für Datenfeld Y$ 25 Byte 
schreibt B$ linksbündig in Feld Y$ 
schreibt B$ rechtsbündig in Feld Y$ 
wandeln Zahlen in Zeichenketten 
wandeln Zeichenketten wieder in 
Zahlen 

schreibt Daten vom Puffer n in Satz s 
holt Daten von Satz s in Puffer n 
liefert zuletzt bearbeitete Satz¬ 
nummer 

liefert Zahl der Sätze in der Datei n 
Laden und Speichern binärer Da¬ 
teien. 


Besonderheiten 

Besondere Befehle für Datenfernverarbeitung vorhanden. # Bild¬ 
schirmeditor für Programmkorrektur # Es gibt auch noch Befehle 
zur Arbeit mit einem Lichtgriffel und Steuerknüppeln. # Viele 
weitere Ausbau- und Erweiterungsmöglichkeiten. 


5.11 Die BASIC-Dialekte 
der LASER Computer 

Auf den LASER Computern 310 und 2001 laufen recht unter¬ 
schiedliche BASIC-Dialekte. Das BASIC des 2001 ermöglicht eine 
höhere Auflösung und bietet eine Reihe von Grafik- und Tonbe¬ 
fehlen, die der 310 nicht hat. Letzterer beherrscht dafür mehr 
Befehle des erweiterten BASIC. 
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Variable und Variablennamen 

Zahlenvariable mit 6 Stellen. * Kein Variablentyp für doppelt¬ 
genaue Rechnung. * Variablennamen mit 5 Zeichen, aber nur 2 
Zeichen signifikant. 

Grundbefehle der BASIC-Hochsprache 

Nicht vorhanden beim 2001: ELSE; sonst keine Einschränkungen. 
* Nicht vorhanden beim 310: ON...GOTO; sonst keine Ein¬ 
schränkungen. Statt FRE(O) RAM(O)—16384 

Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung und zur 
Fehlerbehandlung. * Nicht vorhandene Befehle bei beiden Model¬ 
len : DEF FN, LINE INPUT, LOCATE, MOD, SWAP, 
VARPTR, MERGE, EOF, FIX, INSTR, POS, STRINGS, 
AUTO, DELETE, RENUM. * Beim 310 fehlen außerdem: 
TRAGE, NOTRACE. * Beim 2001 fehlen : INP, OUT, 
INKEYS, PRINT USING, VERIFY. 

Wichtige zusätzliche BASIC-Befehle 

COPY Hardcopy des Bildschirms auf dem Drucker (nur 2001) 
VPEEK Lesen einer Speicherstelle des Videoram (nur 310) 
VPOKE Schreiben in eine Speicherstelle des Videoram (310). 

Bildschirmaufteilung 

310 16 Zeilen mit je 32 Zeichen 

2001 24 Zeilen mit je 40 Zeichen. 

Bildschirmcode 

310 

0- 63 wie ASCII-Code 32-127 
64—127 wie 0—63, aber negativ 

128—255 4 Pixel-Grafikzeichen in verschiedenen Farben. 

2001 

0—127 wie ASCII-Code, internationale Version. 

Grafik- und Farbbefehle 

310 Im Textmodus, aufzurufen mit MODE (0), können 12 Gra¬ 
fikzeichen in vier verschiedenen Farbkombinationen mit POKE in 
das Bildschirmram (28672—29183) geschrieben werden. 
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Im Grafikmodus, MODE (1), gelten in einem Raster von 64x128 
Punkten folgende Befehle (Koordinatennullpunkt links oben): 


SET x,y 
RESET x,y 
POINT x,y 
COLOR v,h 


setzt Punkt in x,y 
löscht Punkt in x,y 
prüft Punkt in x,y 

bestimmt Vorder- und Hintergrundfarbe. 


2001 Im Textmodus, aufzurufen mit TEXT, können einige Gra¬ 
fikzeichen mit POKE-Befehlen in den Bildschirmspeicher 
(6400—7167) gesetzt werden. Im Grafikmodus, aufzurufen mit 
GR, kann in einem Raster von 192 X 256 Punkten mit folgenden 
Befehlen gezeichnet werden: 


PLOT x,y TO u,v 
UNPLOT x,y TO u,v 
VPEEK (adr.) 

VPOKE adr, wert 
COLOR=v,h 


zeichnet Linie von x,y nach u,v 
löscht Linie von x,y nach u,v 
liefert Code, der im Videoram gespei¬ 
chert ist 

schreibt Wert in das Videoram 
bestimmt Vorder- und Hintergrund¬ 
farbe. 


Befehle für die Tonerzeugung 

310 Auf einem Tonkanal können mit dem Befehl SOUND h,d 
31 verschiedene Töne mit unterschiedlicher Dauer programmiert 
werden. 

2001 Auf drei Tonkanälen ist Musikerzeugung möglich. Die Ton¬ 
kanäle können mit Codeziffern im Befehl SOUND (h,d,l), ()... in 
BASIC programmiert werden. Mit SGEN kann direkt auf die Ton¬ 
generatoren in Maschinensprache zugegriffen werden. 

Befehle für die Datenspeicherung 

Der LASER 2001 bietet mit den folgenden Befehlen eine einfache 
Möglichkeit, Daten auf eine Kassette zu speichern und von dort 
wieder zu lesen: 

STORE a,b,C$, D$ speichert den Inhalt der Variablen 
RECALL a,b,C$, D$ liest Daten in Variable ein. 

Mit BSAVE und BLOAD können Daten in Binärform gespeichert 
und gelesen werden. 

Besonderheiten 

Bei beiden LASER-Modellen bestehen auch noch Befehle zur 
Steuerung von Steuerknüppeln. 4= Überdies gibt es Zusatzmodule 
für den Diskettenbetrieb mit weiteren Befehlen. * Das BASIC des 
LASER 210 und des VZ 210 entspricht dem des 310. 


121 


5.12 Das LEVEL-II-BASIC 
des Genie und TRS 80 


Das auf den Genie-Computern 1, 2 und 3, dem Colour Genie und 
den TRS 80-Modellen 1, 3 und 4 laufende BASIC wurde ebenfalls 
von der Firma Microsoft entwickelt, dann aber zum Teil noch 
erweitert. Es ist gut ausgebaut und bedienerfreundlich. Färb- und 
Tonbefehle gibt es nur beim Colour Genie. 

Variable und Variablennamen 

Zahlenvariable mit einfach- und doppeltgenauer Rechnung. 4= 
Variablennamen mit beliebiger Zeichenzahl, aber nur 2 Stellen si¬ 
gnifikant. 

Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen. * Apostroph statt REM zulässig. * Mit 
CLEAR n muß Speicherraum für Zeichenketten reserviert werden. 
RND (a) liefert Zufallszahlen von 1 bis a. 


Befehle des erweiterten BASIC 

Nicht vorhanden : MOD, SWAP. * DBF FN, LINE INPUT, 
INSTR nur im erweiterten DISK-BASIC. * Sonst keine Ein¬ 
schränkungen. * Für den PRINT@-Befehl werden die Plätze des 
Bildschirmspeichers von 0—1023 beziehungsweise 959 durchge¬ 
zählt. 

Bildschirmaufteilung 

Beim Genie 1 und 2 und beim TRS 80-Modell 1 werden, je nach 
Einstellung, 32 oder 64 Zeichen in 16 Zeilen dargestellt. * Das 
Colour Genie zeigt 40 Zeichen in 25 Zeilen. * Genie 3 und einige 
TRS 80-Modelle erlauben auch die Darstellung von 80 Zeichen pro 
Zeile. 

Bildschirmcode 

0-127 ASCII-Code 

128 — 191 Grafikzeichen (Zeichensatz 1 beim Colour Genie) 
192—255 Grafikzeichen (Zeichensatz 2 beim Colour Genie). 

Beim Colour Genie können die Bilder in beiden Grafikzeichen¬ 
sätzen auch frei programmiert werden. 
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Grafik- und Farbbefehle 

Genie 1 und 2, TRS 80/1 

Niedrigauflösende Grafik mit 6-Pixel-Symbolen kann mit der 
Textdarstellung gemischt werden. Es sind 64 X 128 Punkte mit 
folgenden Befehlen darstellbar (Nullpunkt links oben): 

SET x,y schreibt Punkt nach x,y 

RESET x,y löscht Punkt in x,y 
POINT x,y prüft Punkt in x,y. 


Colour Genie 

PRINT-Grafik ist mit LGR aufzurufen. Es gelten folgende Be¬ 
fehle: 

CHAR n wählt Grafikzeichensatz (n = 0... 3) 

COLOR v,h bestimmt Vorder- und Hintergrundfarbe. 

Punkt- und Liniengrafik (96 X 160 Punkte) wird mit FGR aufge- 
rufen. 


PLOT x,y TO u,v 
NPLOT x,y TO u,v 
CIRCLE x,y,r 
FCOLOURf 
FILLf 

PAINT x,y,f,b 


zeichnet Linie von x,y nach u,v 
löscht Linie von x,y nach u,v 
zeichnet Kreis Radius r in x,y 
bestimmt Vordergrundfarbe f 
füllt Bildschirm mit Farbe f 
füllt Fläche ab x,y mit Farbe f bis 
Farbe b. 


In einer Figurentabelle können Zeichenanweisungen gespeichert 
werden, die mit folgenden Befehlen abgerufen werden (siehe auch 
Abb. 6 auf Seite 46): 

SHAPE x,y zeichnet Figur ab x,y 

NSHAPE x,y löscht Figur ab x,y 
SCALE bestimmt Maßstab für Figur. 


Befehle für die Tonerzeugung 

Das Colour Genie besitzt 3 Tongeneratoren, die mit den BASIC- 
Befehlen PLAY und SOUND und direkt in Maschinensprache 
angesprochen werden können. 


Befehle für die Datenspeicherung 

Diskettenbetrieb wird durch verschiedene DOS unterstützt. 
Sequentielle und wahlfrei lesbare Datenspeicherung ist möglich. 
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OPEN”m”,#n,”name:lfwk” öffnet Datei mit dem genannten 

Namen im Modus m als Num¬ 
mer n auf dem Laufwerk Ifwk 

PRINT #n,Variablenliste schreibt Daten in Dateinummer n 
INPUT #n,variabienliste liest Daten von Dateinummer n 

in Variable. 

Für Dateien mit wahlfreiem Zugriff muß man den Aufbau der 
Datensätze in einem Befehl vorher festlegen, durch den ein entspre¬ 
chender Pufferspeicher bereitgestellt wird. Es werden nur Zeichen¬ 
ketten gespeichert. 

FIELD#n, c AS X$,d A$ Y$ Datensatz mit den Feldern X$, 

maximale Länge c und Y$, 
Länge d 

schreibt A$ linksbündig in Puffer 
X$ 

schreibt A$ rechtsbündig in Puf¬ 
fer X$ 

wandeln Zahlen in Zeichenketten 
wandeln Zeichenketten wieder in 
Zahlen 

schreibt Daten vom Puffer n in 
Satz s 

holt Daten vom Satz s in den Puf¬ 
fer n 

liefert zuletzt bearbeitete Satz¬ 
nummer 

liefert Zahl der Sätze in Datei n. 


LSET X$ = A$ 

RSET x$ = A$ 

CVI CVS CVD 
MKI$ MKS$ MKD$ 

PUT #n,s 

GET #n,s 

LOC(n) 

LOF(n) 


Die auf den genannten Computern laufenden Betriebssysteme 
NEW-DOS 80 und G-DOS ermöglichen zusätzlich noch den Auf¬ 
bau von sehr effektiven, wahlfrei lesbaren Dateien mit IGEL- 
Befehlen, in denen mehrere Feldeinteilungen für eine Datei 
bestimmt werden können. In diesen Dateien können Zahlen auch, 
wie im Speicher stehend, in verdichteter Form gespeichert werden. 


Besonderheiten 

Gut verständliches BASIC, da POKE-Befehle, außer für Grafik, 
unnötig sind. ^ Bildschirm oder Zeileneditor möglich. * Viele 
Programmierhilfen im Zusammenhang mit dem DISK-BASIC vor¬ 
handen. 
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5.13 Das BASIC des MSX-Standards 


Das MSX-(Microsoft Extended)BASIC ist in erster Linie für 
Homecomputer gedacht. Es bietet leistungsstarke Grafik-, Farb- 
und Tonbefehle. Programme, die in diesem BASIC geschrieben 
wurden, sind auf mehreren Computerfabrikaten lauffähig. 

Variable und Variablennamen 

Zahlenvariable in einfacher und doppelter Genauigkeit. * Gerech¬ 
net wird immer mit 14 Stellen in BCD-Arithmetik, so daß Run¬ 
dungsfehler wegfallen. ^ Variablennamen in beliebiger Länge mit 
2 signifikanten Zeichen. 

Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen. * Statt REM auch Apostroph zulässig. * 
RESTORE auch mit Zeilennummer akzeptiert. 

Befehle des erweiterten BASIC 

Keine Einschränkungen. 


Wichtige zusätzliche BASIC-Befehle 


BIN$(a) 

CRLIN 

DEFUSR 

ERASE 
HEX$(a) 
INPUTS X 
KEY LIST 
KEY, a X$ 
MOTOR 
TIME 
WAIT p,a 
&B &H &0 


wandelt a in Binärzahl 
liefert vertikale Cursorposition 
bestimmt Einsprungadresse von Maschinenpro¬ 
grammen 

löscht Dimensionierung von Feldern 
wandelt a in Hexadezimalzahl 
liest String mit x Zeichen von der Tastatur 
zeigt oder listet Inhalt der Funktionstasten 
setzt Taste a auf Wert XS 
schaltet Kassettenrecordermotor 
enthält Zeit seit dem Einschalten in Ym s 
Warten, bis am Port p Bitmuster a anliegt 
Vorzeichen für Bin-, Hex- bzw. Oktalzahlen. 


Bildschirmaufteilung 

Der SCREEN-Befehl erlaubt im 1. Parameter die Wahl verschiede¬ 
ner Darstellungen: 

0 = Text mit 24x40 Zeichen 

1 = Text mit 24x32 Zeichen 

2 = hochauflösende Grafik mit 192x256 Punkten 

3 = Vielfarben-Grafik mit 48x64 Punkten. 
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Bildschirmcode 

0-127 wie ASCII-Code, internationale Version 
128—255 Grafikzeichen. 


Grafik- und Farbbefehle 

Bei hochauflösender Grafik gelten folgende Befehle mit dem Koor¬ 
dinatennullpunkt links oben: 

LINE x,y—u,v zeichnet Linie von x,x nach u,v 
CIRCLE (x,y),r zeichnet Kreis mit Radius r in x,y 
COLOR v,h,r bestimmt Farben für Vordergrund (v), Hinter¬ 
grund (h) und Rahmen (r) 

DRAW X$ zeichnet Figur entsprechend X$ 

PAINT(x,y),f,h füllt ab x,y bis Grenze h mit Farbe f 
PRESET (x,y) setzt Punkt in x,y in Hintergrundfarbe 

PSET (x,y) setzt Punkt in x,y in Vordergrundfarbe. 


Mit dem Befehl SPRITE$(n) = zeichenkette können verschiedene 
Sprites definiert und mit PUT SPRITE n,x,y an eine bestimmte 
Stelle des Bildschirms gesetzt werden. 


Befehle zur Tonerzeugung 

3 Tongeneratoren können mit BASIC-Befehlen angesprochen 
werden. 

BEEP erzeugt einen kurzen Ton 

SOUND r,wert schreibt Wert in Register r des Tongenerators 

PLAY X$ spielt Musik entsprechend Zeichenkette X$. 


Befehle für die Datenspeicherung 

Ohne zusätzliches Disketten-Operationssystem ist sequentielle 
Datenspeicherung auf Kassetten mit folgenden Befehlen möglich: 


OPEN”CAS:name” FOR mode AS #k 

PRINT #k,ausdruck 
PRINT#k USING,ausdruck 

INPUT #k,Variablenliste 
LINE INPUT #k,variable 
CLOSE k 


öffnet Kanal k zur 
Kassette 

Schreiben in Datei 
formatiertes Schreiben 
in Datei 

Lesen aus einer Datei 
Lesen bis Zeilenende 
Schließen des Kanals k. 


Als Mode sind zugelassen OUTPUT, INPUT, APPEND. 

BLOAD BSAVE Laden und Speichern binärer Dateien. 
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Besonderheiten 

Bildschirmeditor für Programmkorrekturen vorhanden. * Keine 
Rundungsfehler bei Rechnungen, da mit BCD-Arithmetik gerech¬ 
net wird. * Es besteht eine Reihe von weiteren Befehlen für die 
Bedienung von Steuerknüppeln und Drehreglern für Spiele. * Der 
eingebaute Zeitgeber und die Funktionstasten können im Pro¬ 
gramm abgefragt werden. Programmierung von Sprites, Farb¬ 
grafik und Tonerzeugung in BASIC ohne POKE-Befehle möglich. 


5.14 Das BASIC des ORIC-Atmos 


Das ORIC-BASIC ähnelt in vieler Hinsicht dem Applesoft- 
BASIC, bietet aber noch einige zusätzliche Befehle. Insbesondere 
sind die Möglichkeiten für Grafik- und Farbdarstellung und für die 
Tonerzeugung weiter ausgebaut. 

Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. ^ Kein Variablentyp für doppeltge¬ 
naue Rechnung. * Variablennamen mit beliebiger Zeichenzahl, 
aber nur 2 Zeichen signifikant. 

Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen. ^ Für »wahr« wird +1, für »falsch« 0 
erzeugt. * Keine Einzelbitverarbeitung in BASIC. * Positive Zah¬ 
len werden ohne Leerstelle ausgegeben und gespeichert. 

Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung. * Nicht 
vorhandene Befehle: INP, LINE INPUT, MOD, OUT, PRINT 
USING, SWAP, VARPTR, EOF, INSTR, STRINGS, AUTO, 
RENUM. * Bei GET wartet das Programm unbeschränkt auf eine 
Eingabe. 


Wichtige zusätzliche BASIC-Befehle 


DEEK(adr) 

DOKE adr, a 
GRAB 
HEX$(a) 
HIMEMz 


liefert Inhalt zweier Adressen als Dezimal¬ 
zahl 

speichert a in adr. und adr. +1 

gibt Reservierung für Hochauflösung frei 

wandelt a in Hexadezimalzahl 

bestimmt höchsten Speicherplatz für 

BASIC 
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KEYS 

POP 

REPEAT...UNTIL 

RELEASE 

WAITa 


wie GET, aber ohne Anhalten 

löscht letzte Stückeintragung 

Schleifenanweisung 

hebt GRAB auf 

a/100 Sekunden warten. 


Bildschirmaufteilung 

Im Textmodus werden 27 Zeilen mit je 38 Zeichen gezeigt. Die 
beiden ersten Spalten in jeder Zeile dienen zum Speichern des Farb- 
codes. Bei hochauflösender Grafik sind 200x240 Punkte darstell¬ 
bar, zuzüglich 3 Textzeilen unten. 

Bildschirmcode 

1. Zeichensatz (mit LORES 0 aufrufbar) 

0— 31 Steuercode 

32—127 wie ASCII-Code, internationale Version. 

2. Zeichensatz (mit LORES 1 aufrufbar) 

0—31 Steuercode 

32—127 Grafikzeichen. 


Grafik- und Farbbefehle 

In der Betriebsart LORES 1 können Grafiken mit den Zeichen des 
2. Zeichensatzes mit PRINT-Befehlen erstellt werden. Hierfür gel¬ 
ten folgende Befehle: 

PLOT x,y,p setzt Zeichen p in x,y 

PLOT x,y,X$ schreibt Zeichen des Strings, X$ ab x,y. 

Wahl der Farbe und besonderer Darstellung (Blinken usw.) durch 
ESCAPE-Sequenzen, die unsichtbar jeweils als erste Positionen in 
jeder Zeile gespeichert werden. 

In der Betriebsart HIRES (hochauflösende Grafik) gelten folgende 
Befehle: 


CURSET x,y,p 

CURMOVE x,y,p 
DRAWx,y 
FIEL z,b,f 
CIRCLE r,p 
PATTERN a 
POINT (x,y) 
PAPER h 
INKv 


setzt Cursor auf x,y und bestimmt Parameter 

für Vorder- und Hintergrundfarbe 

bewegt Cursor relativ zur letzten Position 

zeichnet Linie von Cursorposition nach x,y 

füllt z Zeilen mit b Byte in Farbe f 

zeichnet Kreis mit Radius r 

bestimmt Darstellung von Linien 

prüft Grafikpunkt 

schaltet Hintergrundfarbe ein 

schaltet Vordergrundfarbe ein. 
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Befehle für die Tonerzeugung 

Die Befehle EXPLODE, PING, SHOOT und ZAP erzeugen ent- 
sprechende Geräusche. Im übrigen stehen 3 Tongeneratoren für die 
Musikerzeugung zur Verfügung, die mit BASIC-Befehlen ange¬ 
sprochen werden können. 

MUSIC in den nachfolgenden Parametern kann der Kanal, die 
Oktave, die Note und die Lautstärke bestimmt werden 
PLAY mischt Töne aus zwei Kanälen und bestimmt Hüllkurve 
SOUND vereinfachter Tonbefehl für Geräusche. 

Befehle für die Datenspeicherung 

Numerische Datenfelder können auf einer Kassette mit STOREx 
gespeichert und mit RECALx wieder gelesen werden. Als x ist der 
Feldname einzusetzen. 

Besonderheiten 

Bildschirmeditor für Programmkorrekturen vorhanden. ^ Viele 
Routinen der Maschinensprache auch in BASIC zugänglich. 


5.15 Das BASIC 

des Schneider CPC 464 

Das auf der Grundlage des Microsoft-BASIC von der englischen 
Firma Amsoft entwickelte Locomotive-BASIC hat einen sehr gut 
ausgebauten Befehlssatz, der vor allem auch benutzerfreundliche 
Grafik- und Tonbefehle bietet und auch für Steuerungsaufgaben 
geeignet ist. 

Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. ^ Variablennamen in Groß- und 
Kleinschrift bis zu 40 Zeichen zulässig und signifikant. 

Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen. * RESTORE ist auch mit Zeilennummer 
zulässig. * Leerstellen oder Satzzeichen müssen vor und nach 
Befehlswörtern stehen. 

Befehle des erweiterten BASIC 

Keine Einschränkungen, aber nur Wandlung zwischen Integer- 
und Real-Variablen. 
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Statt LPRINT PRINT#8 (Druckerausgabe). 
Statt LLIST ^ LIST#8 (Listing auf Drucker). 


Wichtige zusätzliche BASIC-Befehle 

AFTER a,b Unterprogrammanruf nach Zeitablauf a auf 


BIN$(a) 

CHAIN n,z 

Uhrb 

liefert Binärzahl von a 

lädt Programm mit Namen n und startet es 
ab Zeile z 

DEG 

schaltet von Bogenmaß auf Gradrechnung 

DI 

ERASE a 

EI 

EVERYa 

HEX$(a) 

HIMEM 

um 

verhindert Interrupt außer durch BREAK 
Aufheben von Felddimensionierungen 
hebt DI-Anweisung auf 
Unterprogrammanruf alle a Zeitintervalle 
wandelt a in Hexadezimalzahl 
enthält höchste von BASIC benutzte 
Adresse 

INKEY(a) 

JOY(a) 

KEY a,’’X” 

LOG 10(a) 
LOWERS(A$) 
MAX(liste) 
MEMORY adr 
MIN(liste) 

RAD 

ROUND(a,b) 

TIME 

UPPERS(A$) 

VPOS 

WAITadr,b 
WHILE..WEND 
WIDTH X 

XOR 

prüft Tastatureingabe 

meldet Stellung des Steuerknüppels a 

belegt Taste a mit Zeichenkette X 

liefert Logarithmus zur Grundzahl 10 

wandelt in A$ Groß- in Kleinschrift 

liefert Maximum der Zahlen in der Liste 

setzt Obergrenze für BASIC 

liefert Minimum der Zahlen in der Liste 

schaltet von Grad- auf Bogenmaßrechnung 

liefert a, auf b Stellen gerundet 

enthält Zeit 

wandelt in A$ Klein- in Großbuchstaben 
enthält vertikale Cursorposition 
wartet, bis an adr Bitmuster b ansteht 
Schleifenbefehle 

bestimmt Breite der Druckerausgabe 
Operator für exclusiv oder. 


Bildschirmaufteilung 

Der MODE-Befehl bestimmt folgende Bildschirmeinteilungen: 

0 25 Zeilen mit 20 Spalten, 16 Farben 200 X160 Punkte 

1 25 Zeilen mit 40 Spalten, 4 Farben 200x320 Punkte 

2 25 Zeilen mit 80 Zeichen, 2 Farben 200x640 Punkte. 

Mit WINDOW#n,l,r,o,u kann ein Bildschirmfenster definiert 
werden, das mit #n in verschiedenen Befehlen ansprechbar ist. 


130 


Bildschirmcode 

0—127 ASCII-Code, internationale Version 
128—255 Grafikzeichen. 


Grafik- und Farbbefehle 

In allen 3 Bildschirmmodi gelten folgende Befehle (Koordinaten¬ 
nullpunkt ist links oben): 


PLOT x,y,v 
DRAWx,y,v 
DRAWR x,y,v 
ORIGIN x,y 
XPOS YPOS 
MO VE x,y 
MOVER x,y 
BORDER f<,g> 
PAPER f<,g> 
INK f<,g> 


setzt Punkt in x,y in Vordergrundfarbe v 

zeichnet Linie nach u,v in Farbe v 

zeichnet x und y Schritte relativ 

bestimmt Standpunkt des Grafik-Cursors 

enthält Position des Grafik-Cursors 

bewegt Grafik-Cursor nach x,y 

bewegt Grafik-Cursor relativ 

bestimmt Randfarbe f, die mit g wechseln kann 

bestimmt Hintergrundfarbe f 

bestimmt Vordergrundfarbe f. 


Mit SYMBOL n, ”X$” können Sprites in der Zeichenkette defi¬ 
niert und mit LOCATE x,y : PRINT CHR$(n) auf den Bild¬ 
schirm gebracht werden. 


Befehle zur Tonerzeugung 

3 Tongeneratoren können mit BASIC-Befehlen angesprochen 
werden. 

SOUND erzeugt einen Ton entsprechend den nachfolgenden 
Parametern für Kanal, Tonperiode, Lautstärke, Laut¬ 
stärkenvariation, Tonvariation, Geräuschfolge 
ENT variiert nachfolgenden Ton in seiner Höhe 

ENV variiert nachfolgenden Ton in seiner Lautstärke. 


Befehle für die Datenspeicherung 

Durch BASIC wird die sequentielle Datenspeicherung auf dem 
eingebauten Recorder unterstützt. Für die Kassettenspeicherung 
gelten folgende Befehle: 


OPENIN”dateiname” 

OPENOUT^dateiname” 

PRINT#n,var.liste 

INPUT#n,var.liste 

CAT 


öffnet Datei zum Lesen 
öffnet Datei zum Schreiben 
schreibt Daten in Datei 
liest Daten von Datei 
gibt Inhaltsverzeichnis aus. 
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Besonderheiten 

Zwei Arbeitsgeschwindigkeiten für den eingebauten Recorder 
möglich. * Weitere BASIC-Befehle auch für Steuerungsaufgaben 
in Echtzeit. * Zeileneditor und etwas gewöhnungsbedürftiger 
Copy-Editor vorhanden. 

5.16 Das Sharp-BASIC 
der MZ-Modelle 

Das BASIC des MZ-700 entspricht im wesentlichen den auf den 
MZ-80-Modellen laufenden Versionen. Es ist allerdings durch 
Färb- und Grafikbefehle zum Ansteuern des eingebauten Plotters 
erweitert. 


Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. * Kein Variablentyp für doppeltge¬ 
naue Rechnung. * Variablennamen mit beliebiger Zeichenzahl, 
aber nur die beiden ersten Zeichen signifikant. 


Befehle der BASIC-Hochsprache 

Nicht vorhanden : ELSE. ^ Vergleichsoperatoren nur bedingt zum 
Vergleich von Zeichenketten wirksam. * LOG(a) liefert den deka¬ 
dischen Logarithmus. 


Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung. ^ Nicht 
vorhandene Befehle : LINE INPUT, MOD, SWAP, VARPTR, 
FIX, INSTR, TRON, TROFF. 


Statt LOCATE 
Statt LPRINT 
Statt LLIST 
Statt POS 
Statt ERR 
Statt FRE(x) 


CURSOR (Druckposition bestimmen). 
^ PRINT/P (Druckerausgabe). 

LIST/P (Listing auf Drucker). 

CSRH (Cursorposition). 

^ ERN (Fehlercode). 

SIZE (freier Speicherraum). 


Wichtige zusätzliche BASIC-Befehle 

CSRV liefert vertikale Cursorposition 

DEF KEY(a)= belegt Funktionstaste a (MZ-700) 
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LIMIT adr bestimmt höchsten Speicherplatz in BASIC 

LN(a) liefert natürlichen Logarithmus von a 

MON oder BEY Anruf Monitor, Verlassen der BASIC-Ebene 
SWAP tauscht Programme von Kassette und Speicher 

USR(adr) bestimmt Anfangsadresse für Unterprogramm. 

Bildschirmaufteilung 

Im Textmodus 25x40 Zeilen. 

Im Grafikmodus 50x80 Pixel. 

Mit CONSOLE läßt sich beim MZ-700 ein Bildschirmfenster defi¬ 
nieren. 

Bildschirmcode 

0— 26 Großbuchstaben 
32— 47 Zahlen und Satzzeichen 
129—155 Kleinbuchstaben 
170—175 deutsche Umlaute. 

Alle anderen Codes sind mit Grafikzeichen belegt. 


Grafik- und Farbbefehle 

Neben der PRINT- und POKE-Grafik im Textmodus können ein¬ 
zelne Punkte mit BASIC-Befehlen gesetzt und gelöscht werden. 
Koordinatennullpunkt links oben. 

SET x,y, setzt Punkt bei x,y 
RESET x,y löscht Punkt bei x,y. 

Beim MZ-700 gibt es noch besondere Befehle zum Ansprechen des 
wahlweise einbaubaren Farbplotters: 


MODETN 
MODE TL 
MODE TS 
MODE GR 
PCOLOR f 
LINE<a,>x,y 
RLINE 
MO VE x,y 
RMOVE 
PHOME 
GPRINT(g,l),X$ 
AXIS 
CIRCLE 


Textbetrieb mit 40 Zeichen/Zeile 
Textbetrieb mit 26 Zeichen/Zeile 
Textbetrieb mit 80 Zeichen/Zeile 
Grafikbetrieb mit 480 Punkten/Zeile 
wählt Zeichenfarbe f 
zeichnet Linie in der Art a nach x,y 
wie vor, aber relative Werte von x,y 
bewegt Stift nach x,y 
wie vor, aber relative Werte für x,y 
bewegt Stift in Ausgangsposition 
druckt X$ in Größe g und Lage 1 
zeichnet und skaliert Koordinatenkreuz 
zeichnet Kreis oder Kreisabschnitt. 
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Befehle zur Tonerzeugung 

Tonerzeugung ist mit BASIC-Befehlen auf dem MZ-80 program¬ 
mierbar, wobei nicht die physikalischen Daten, sondern die Noten¬ 
bezeichnungen verwendet werden. Diese können für mehrere hin¬ 
tereinander zu spielende Tone in eine Zeichenkette geschrieben 
und mit MUSIC X$ aufgerufen werden. Jeder Ton kann darin wie 
folgt spezifiziert werden: 

Oktave, Halbtonspezifikation, Tonbezeichnung, Dauer. 

Der Befehl TEMPO a bestimmt das Tempo der Tonfolgen. 


Befehle für die Datenspeicherung 

Zur Datenspeicherung auf einer Kassette muß ein spezieller Recor¬ 
der verwendet werden. Es gelten dann folgende Befehle: 


WOPEN^name” 
PRINT/T a,b,X$ 
ROPEN”name” 
INPUT/T a,b,X$ 


öffnet Datei name zum Schreiben 
schreibt Daten auf Datei name 
öffnet Datei name zum Lesen 
liest Daten in Variable. 


Bei Diskettenspeicherung ist auch noch die Dateinummer und das 
Laufwerk in den Offnungsbefehl einzusetzen. 


Besonderheiten 

Bildschirmeditor für Programmkorrekturen vorhanden. ^ Cursor- 
Steuerkommandos können auch im Programm nach PRINT als 
Zeichenkette verwendet werden. * Der beim MZ-700 einbaubare 
Farbplotter kann statt eines Bildschirmgerätes zur Ausgabe ver¬ 
wendet werden. 


5.17 Das Sinclair BASIC 

Während das BASIC des ZX-81 recht knapp mit Befehlen ausge¬ 
stattet ist, sind beim Spectrum die Grundbefehle im wesentlichen 
vorhanden. Beide Dialekte zeichnen sich aber durch gewisse Eigen¬ 
arten aus, die sonst bei BASIC nicht üblich sind. 

Variable und Variablennamen 

Zahlenvariable mit 8 Stellen. * Kein Variablentyp für doppeltge¬ 
naue Rechnung. * Namen von Zahlenvariablen in unbegrenzter 
Länge signifikant. ^ Als Laufvariable in FOR...NEXT-Schleifen 
und für alle Felder nur ein Buchstabe als Name zulässig. ^ Zei¬ 
chenketten müssen in Feldern gespeichert, und die Länge muß als 
erstes dimensioniert werden. 
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Grundbefehle der BASIC-Hochsprache 

Nicht vorhanden beim ZX-81: READ, DATA, ELSE, ON 
GOTO, RESTORE, FRE. * Nach Funktionen wird das Argu¬ 
ment ohne Klammer geschrieben. * Mehrfachzuweisungen mit 
LETsind erlaubt. * Neudimensionierung mit DIM ist erlaubt. 

Statt ASC(x) —> CODE x (Ausgabe Zeichencode) 

Statt MID$, LEFT$, Stringaufteilung mit A$(b TO c) 
RIGHTS ^ 

Statt RANDOMIZE —> RAND (Neusetzen Zufallsgenerator). 


Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung und zur 
Fehlerbehandlung. Nicht vorhandene Befehle bei beiden Model¬ 
len : LINE INPUT, MOD, PRINT USING, SWAP, VARPTR, 
EOF, FIX, INSTR, POS, STRINGS, AUTO, DELETE, 
RENUM, TRON, TROFF. Darüber hinaus beim ZX-81 nicht 
vorhanden: DEF FN, VERIFY, OUT. 


Wichtige zusätzliche BASIC-Befehle 


ACSg 

ASNg 

BIN 

BRIGHT 

COPY 

FAST 

FLASH 

PAUSE a 

SCROLL 


liefert Arcuscosinus von g 

liefert Arcussinus von g 

Vorzeichen für Binärzahl (nur Spectrum) 

steuert Helligkeit der Ausgabe (nur Spectrum) 

Hardcopy des Bildschirms auf dem Drucker 

schneller Arbeitsrhythmus (nur ZX-81) 

Blinken der Ausgabe (nur Spectrum) 

Warten für a/50 Sekunden 

eine Zeile weiterschieben (nur ZX-81). 


B ildschirmaufteilung 
ZX-81 Text 22 Zeilen mit je 22 Zeichen 
ZX-81 Grafik 42x64 Punkte 
Spectrum Text 22 Zeilen mit 32 Zeichen 
Spectrum Grafik 176x256 Punkte. 

Bildschirmcode 

ZX-81 Spectrum 

1— 10 Grafikzeichen 0— 31 Steuercode 

11— 27 Satz-und Sonderzeichen 32—127 wie ASCII-Code 

28— 63 Ziffern und Buchstaben 128—143 Grafikzeichen 

64— 66 Befehlswörter 144—164 frei für Benutzer 
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165—255 Befehlswörter 


67—111 nicht benutzt 
112—121 Befehlswörter 
122-191 wie 1—66, negativ 
192—255 Befehlswörter 


Grafik- und Farbbefehle 

Nach dem Umschalten mit GRAPHICS können Grafikzeichen 
positiv oder negativ mit PRINT auf den Bildschirm gesetzt wer¬ 
den. Punktgrafik mit dem Koordinatennullpunkt links unten mit 
folgenden Befehlen: 


PLOTx,y 
UNPLOT x,y 
PLOT INVERSE 
DRAWx,y 

CIRCLE x,y,r 


setzt Punkt in x,y 

löscht Punkt in x,y (nur ZX-81) 

löscht Punkt (nur Spectrum) 

zeichnet Linie mit x,y relativen Schritten 

(Spectrum) 

zeichnet Kreis in x,y mir Radius r (nur 
Spectrum) 


Nur der Spectrum erlaubt Farbdarstellung in 8 Farben. 


Border f bestimmt Farbe für den Rand 

PAPER f bestimmt Farbe für den Hintergrund 

INK f bestimmt Farbe für den Vordergrund. 


Befehle für die Tonerzeugung 

Tonerzeugung ist nur mit dem Spectrum möglich. Auf einem 
Tonkanal kann man mit dem Befehl BEEP d, h Töne in mehreren 
Oktaven erzeugen. Die Dauer d ist in Sekunden, die Tonhöhe in 
Halbtonschritten als positive oder negative Zahl einzusetzen. 


Befehle für die Datenspeicherung beim Spectrum 
Auf einer Kassette können mit SAVE ”name” DATA a(x) auch 
Felder gespeichert und mit LOAD ”name” DATA a(x) wieder in 
den Speicher eingelesen werden. 

Für den Betrieb mit dem Microdrive gelten zum Speichern und 
Lesen von sequentiellen Dateien ähnliche Befehle, wie sonst beim 
Diskettenbetrieb üblich. 

Besonderheiten 

Die Prüfung auf Syntaxfehler findet sofort nach Betätigung der 
RETURN-Taste vor der Speicherung des Befehls statt. * Durch 
Benutzung der PEEK- und POKE-Befehle sind viele Program- 
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miertricks möglich. * In vielen Kleinigkeiten weicht das Laufver¬ 
halten trotz gleicher Befehlswörter von anderen BASIC-Dialekten 
ab. 


5.18 Das BASIC 


der Spectra-Video-Computer 


Das ebenfalls von Microsoft entwickelte BASIC für die Computer 
SV-318 und SV-328 ist sehr gut ausgebaut und benutzerfreundlich. 
Auch für farbige Grafikdarstellungen und klangvolle Musik sind 
keine POKE-Befehle notwendig. 

Variable und Variablennamen 

Zahlenvariable in einfacher und doppelter Genauigkeit. Varia¬ 
blennamen in beliebiger Länge mit 2 signifikanten Zeichen. 

Grundbefehle der BASIC-Hochsprache 

Keine Einschränkungen. * Statt REM auch Apostroph zulässig. * 
RESTORE und RETURN auch mit Zeilennummer erlaubt. 

Befehle des erweiterten BASIC 

Keine Einschränkungen. 


Wichtige zusätzliche BASIC-Befehle 


MOTOR ON/OFF 
OKT$(a) 

SCREEN m 


BEEP 

BIN$(a) 


CLICK ON/OFF 
CSRLINE 


ERASE 

HEX$(a) 


SWITCH 

TIME 


WAIT p,a 


KEY a,X$ 
KEY LIST 


erzeugt kurzen Ton 

liefert Binärwert von a (Vorzeichen $B) 
Tastaturklick ein-/ausschalten 
enthält Zeilenposition des Cursors 
löscht Dimensionierung von Feldern 
liefert Hexadezimalwert von a (Vorzeichen 
$H) 

setzt Taste a auf Wert XS 
Ausgabe der Bedeutung der Funktions¬ 
tasten 

schaltet Kassettenrecordermotor 
liefert Oktalwert von a (Vorzeichen SO) 
bestimmt Bildschirmmodus 
Umschalten auf zweite Speicherbank 
enthält Zeit in ’/m Sekunden 
Warten, bis am Port p Bitmuster a ansteht. 
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Bildschirmaufteilung 

SCREEN 0 Textmodus, je nach Einstellung mit WIDTH in 25 
Zeilen, mit 39, 40 oder 80 Zeichen 
SCREEN 1 hochauflösende Grafik mit 192x256 Punkten 
SCREEN 2 niedrigauflösende Grafik mit 48—64 Punkten. 

Bildschirmcode 
0- 94 wie ASCII-Code 32-127 
95 — 190 wie 32—127, aber negativ 

191 Zeichen, auf dem der Cursor steht 
192—247 Grafikzeichen, fest programmiert 
248—255 selbst zu definierende Zeichen. 


Grafik- und Farbbefehle 


Für die hochauflösende Grafik (Koordinatennullpunkt links oben) 
gelten folgende Befehle, für die jeweils viele Parameter zugelassen 
sind: 


LINE 

DRAWXS 

CIRCLE 

PAINT 

COLOR 

GET 

PUT 

LOCATE 

SPRITES 

PUTSPRITE 


zeichnet Linie absolut und relativ 
zeichnet Figur entsprechend X$ 
zeichnet Kreise, Kreisabschnitte und anderes 
füllt Figur mit Farbe 

bestimmt Farbe für Vorder-, Hintergrund und 
Rand 

speichert Bildschirmbereich in ein Feld 
gibt in einem Feld gespeicherte Grafik aus 
schreibt Text in Grafik 
definiert Sprite 

setzt Sprite auf den Bildschirm. 


Mit VPEEK und VPOKE sind auch direkte Eingriffe in das Video- 
ram möglich. 


Befehle zur Tonerzeugung 

BEEP erzeugt einen kurzen Ton 

SOUND r,wert schreibt Wert in Register r des Tongenerators 

PLAY XS spielt Musik, entsprechend Zeichenkette X$. 


Befehle für die Dateiverwaltung 

Unterstützt werden sequentielle Dateien und zusammen mit dem 
Disk-BASIC auch wahlfrei lesbare Dateien. 

Schreibweise des Dateinamens: ”laufwerk:name.erg” 
Laufwerk=l oder 2, Name 8 Zeichen, Ergänzung 3 Zeichen. 
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OPEN”name” 

FOR OUTPUT AS .n 
OPEN”name” 

FOR INPUT AS .n 
PRINT #n,vanablenliste 
INPUT #n,Variablenliste 


Schreiben der sequentiellen 
Datei n 

Lesen der sequentiellen Datei 
n 

schreibt Daten in Datei n 
liest Daten aus Datei n in Va¬ 
riablenliste. 


Für wahlfrei lesbare Dateien muß der Aufbau der Datensätze in 
einer Feldeinteilung festgelegt werden, wodurch ein Pufferspeicher 
reserviert wird. Es werden nur Zeichenketten gespeichert. 


FIELD,n,25 AS 
OPEN”name” AS #n 
LSET Y$ = B$ 

RSET Y$ = B$ 

MKI$ MKS$ MKD$ 
CVI CVS CVD 


PUT# n,s 
GET# n,s 
LOC(n) 

LOF(n) 

BLOAD BSAVE 


reserviert für Datenfeld Y$ 25 Byte 
öffnet wahlfrei lesbare Datei 
schreibt B$ linksbündig in Feld Y$ 
schreibt B$ rechtsbündig in Feld Y$ 
wandeln Zahlen in Zeichenketten 
wandeln Zeichenketten wieder in 
Zahlen 

schreibt Daten vom Puffer n in Satz s 
holt Daten von Satz s in Puffer n 
liefert zuletzt bearbeitete Satz¬ 
nummer 

liefert Zahl der Sätze in der Datei n 
Laden und Speichern binärer Da¬ 
teien. 


Besonderheiten 

Bildschirmeditor für Programmkorrektur. # Es gibt auch noch 
Befehle, die den Programmlauf nach einer Unterbrechung durch 
Steuerknüppel, Funktionstasten, Zeitgeber und anderes regeln. 


5.19 Das BASIC des Thomson-TO 7 

Das BASIC des TO 7 ist in erster Linie auf den Gebrauch im Heim, 
zum Spielen und für kreative Beschäftigung ausgelegt. Es ist benut¬ 
zerfreundlich und ermöglicht gute Farbgrafik ohne POKE-Be- 
fehle. 

Variable und Variablennamen 

Zahlenvariable mit 9 Stellen. # Kein Variablentyp für doppeltge¬ 
naue Rechnung. # Variablennamen mit beliebiger Zeichenzahl, 
aber nur 16 Zeichen signifikant. 
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Befehle der BASIC-Hochsprache 

Keine Einschränkungen. * RND erfordert kein Argument. 


Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung und zur 
Fehlerbehandlung. * Nicht vorhandene Befehle : DEFFN, INP, 
MOD, OUT, RANDOMIZE, PRINT USING, SWAP, CALL, 
VARPTR, MERGE, EOF, FIX, POS, STRINGS, AUTO, 
RENUM. * Mit CLEAR muß Speicherraum für Zeichenketten 
reserviert werden. 

Statt LLIST —> LIST”LPTR” (Programmlisting auf Drucker) 

Wichtige zusätzliche BASIC-Befehle 

ATTRB bewirkt vergrößerte Darstellung der Zeichen 

BEEP erzeugt kurzen Ton 

CONSOLE 2 reserviert die ersten 2 Zeilen des Bildschirms. 

Bildschirmaufteilung 

Im Textmodus werden je 40 Zeichen in 25 Zeilen gezeigt oder 
wahlweise auch 200x320 Punkte gesetzt. 

Bildschirmcode 

0— 31 Steuercode 

32 — 127 wie ASCII-Code, internationale Version , 

32—255 Grafikzeichen nach Umschaltung auf Grafik. 

Die im Französischen üblichen Accents und die Doppelpunkte 
über den deutschen Umlauten können durch jeweils zwei zusätzli¬ 
che Tastenanschläge erzeugt werden. 

Grafik- und Farbbefehle 

Für die PRINT-Grafik stehen 92 fest programmierte Zeichen mit je 
6 Pixeln zur Verfügung. Außerdem können bis zu 128 Zeichen im 
8-mal-8-Raster mit dem Befehl DEFGRS(n)= frei definiert wer¬ 
den. Hierfür ist auch Speicherreservierung mit CLEAR anzahl 
notwendig. 

Vor dem Schreiben von Grafikzeichen mit der CHR$-Funktion 
muß mit PRINT CHR$(14) auf Grafikcode geschaltet werden. Die 
Rückschaltung auf den ASCII-Code geschieht mit PRINT 
CHR$(15). 


140 


Folgende Befehle dienen zum Zeichnen in hochauflösender Grafik: 
SCREEN v,h,r wählt Vorder-, Hintergrund und Rah¬ 

menfarbe 
setzt Punkt bei x,y 
zeichnet Linie nach u,v 
zeichnet Linie von x,y nach u,v in 
Farbe f 

zeichnet Rechtecke mit Ecken x,y und 
u,v 

zeichnet Fläche mit Ecken x,y und u,v. 


PSET x,y, 

LINE -(u,v) 
LINE(x,y)-(u,v),f 

BOX(x,y)-(u,v),f 

BOXF(x,y)-(u,v),f 


Befehle für Benutzung des Lichtgriffels 

Mit dem Lichtgriffel kann gearbeitet werden, wenn vorher die ent¬ 
sprechend markierte Stelle auf dem Bildschirm mit dem Griffel 
berührt wurde. Es gelten dann folgende Befehle: 


INPUTPEN s,l 

PSET (s,l) 
LINE-(c,d) 

PEN n,(x,y)-(u,v) 
ON PEN n GOTO z 


übergibt Koordinaten des Griffels an 
s und 1 

setzt Punkt in s,l (Spalte, Linie) 
zeichnet Linie, dem Griffel folgend 
definiert Feld n für Lichtgriffel 
verzweigt Programm. 


Befehle zur Tonerzeugung 

Ein Tonkanal steht zur Tonerzeugung zur Verfügung, der mit den 
im Italienischen und Französischen üblichen Notenbezeichnungen 
DO - RE - MI — FA — SO - LA - SI - angesprochen wird. Die 
Notenbezeichnungen sind in eine Zeichenkette nach dem Befehls¬ 
wort PLAY in der gewünschten Reihenfolge zu schreiben. Hier 
kann auch nur die Oktave (01 bis 05) und die Tondauer (L12 —L96) 
eingesetzt werden. 


Befehle für die Datenspeicherung 

Zur Datenspeicherung auf einer Kassette muß immer ein Kanal 
geöffnet werden. Dann ist sequentielle Speicherung möglich. 

OPEN,m,”name” öffnet Datei mit dem genannten Na¬ 

men auf dem Kanal n in der Be¬ 
triebsart m auf dem Gerät g 

PRINT #k,a,b,c schreibt Daten auf Datei in Kanal k 

INPUT #k,a,b,c liest Daten von Kanal k in Variable. 
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Besonderheiten 

Als Standardausrüstung eingebauter Lichtgriffel, der mit einfachen 
Befehlen programmiert werden kann. * Farbgrafik auch bei hoher 
Auflösung immer mit 8 Farben. 


5.20 DasTI-BASIC 

von Texas Instruments 


Das auf dem Homecomputer TI 99/4A laufende BASIC weicht in 
vielen Kleinigkeiten vom heute üblichen ab. Es gibt aber auch ein 
»Extended BASIC«, das zusätzliche Möglichkeiten für die Pro¬ 
grammierung bietet. Da das TI-BASIC vor allem für Spielpro¬ 
gramme geschaffen wurde, bietet es viele Möglichkeiten für Grafik 
und Tonerzeugung. 

Variable und Variablennamen 

Zahlenrechnung im BCD-System, Darstellung mit 10 Stellen. * 
Exponentialdarstellung mit 6 Stellen. 4= Variablennamen mit maxi¬ 
mal 15 Zeichen signifikant. 

Befehle der BASIC-Hochsprache 

Nicht vorhanden: SPC, LEFT$, RIGHTJ. * Doppelpunkt nicht 
als Befehlsseparator zulässig. * Vor und hinter BASIC-Befehls- 
wörtern müssen Leerzeichen beziehungsweise bestimmte Satz- und 
Sonderzeichen stehen. 

Statt MID$ SEG$ (Aufteilung einer Zeichenkette). 


Befehle des erweiterten BASIC 

Keine Befehle zur Variablendefinition oder -Wandlung. * Befehle 
für Fehlerbehandlung nur im EXT-BASIC. ^ Nicht vorhandene 
Befehle: INP, LINE INPUT, MOD, OUT, PRINT USING, 
SWAP, VARPTR, LPRINT, LLIST, INSTR, STRINGS. * Keine 
Operatoren für logische Verknüpfungen. 


Statt AUTO 

Statt CLS 
Statt RENUM 
Statt GET 
Statt + 


^ NUMBER (Automatische Zeilennumerie¬ 
rung). 

^ CALL CLEAR (Bildschirm löschen). 

RESEQUENCE (Neunumerierung). 

—> CALL KEY (Tastaturabfrage). 

—> & (Stringverknüpfung). 
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Wichtige zusätzliche BASIC-Befehle 


ACCEPT 

BEY 

CALLJOYST 
DISPLAY 
IMAGE 
NUMBER z 
OPTION BASE 
PRINT: 
UNBREAK 


positioniert Eingabe (nur EXT-BASIC) 
Abschalten von BASIC 
Abfrage der Steuerknüppel 
ähnlich PRINT, aber mit Positionierung 
positioniert Ausgabe (nur EXT-BASIC) 

Aufruf des Zeileneditors 
bestimmt ersten Index für Felder 
macht Zeilenvorschub 

löscht alle mit BREAK markierten Stopp¬ 
stellen. 


Bildschirmaufteilung 

Es werden je 32 (28) Zeichen in 24 Zeilen auf dem Bildschirm 
gezeigt. 


Bildschirmcode 

0— 31 Steuercode 

32— 95 wie ASCII-Code, internationale Version 
96—159 selbst definierte Zeichen. 

Je 8 Codeziffern sind in einem Zeichensatz zusammengefaßt, um 
ihnen eine Farbinformation zuweisen zu können. 


Grafik- und Farbbefehle 

Alle Färb- und Grafikanweisungen erfolgen in Form von Unter¬ 
programmanrufen mit CALL programmname. Die folgenden 
Programmnamen können verwendet werden: 


COLOR(a,v,h) 

SCREEN(h) 

CHAR(c,”string”) 

HCHAR(z,s,c,w) 

VCHAR(z,s,c,w) 

GCHAR(z,s,x) 


bestimmt Vorder- und Hintergrundfarbe 
für die im Zeichensatz a stehenden Zeichen 
bestimmt Hintergrundfarbe n 
definiert im String Zeichen für Code n 
setzt das Zeichen mit Code c in Zeile z und 
Spalte s und wiederholt es w-mal in der 
Zeile 

wie HCHAR, aber mit Wiederholung in 
der Spalte 

speichert den Code des in Zeile z und Spal¬ 
te s stehenden Zeichens in der Variablen x. 
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In dem String zur Definition von Zeichen im CHAR-Anruf müs¬ 
sen die zu setzenden Bitmuster als Hexadezimalzahlen geschrieben 
werden. 


Befehle zur Tonerzeugung 

Mit dem SOUND-Unterprogramm programmiert man die Dauer 
sowie die Tonhöhen und Lautstärken für 4 Töne. Die Dauer wird 
in Viooo Sekunden, die Tonhöhe als Frequenz in Hertz und die 
Lautstärke in 30 Stufen jeweils als Zahlenwert in den Befehl 
gesetzt. Durch Einsatz von negativen Zahlen als Frequenzwert 
kann auch Rauschen programmiert werden. 


Befehle für die Datenspeicherung 

Das TI-BASIC unterstützt sequentielle Dateien und mit Ein¬ 
schränkung auch wahlfreies Lesen im Kassettenbetrieb. Es werden 
hierfür zwei Recorder angeschlossen, einer für die zu lesenden und 
einer für die zu speichernden Daten. 

OPEN #n:g,t,f,m öffnet Datei mit der Nummer n auf dem 
Gerät g des Typs t im Format f in der Be¬ 
triebsart m 

PRINT #n: a,b,c schreibt Daten auf Datei n aus Variablen 

INPUT #n: a,b,c liest Daten aus der Datei n in Variable. 

Dateien mit wahlfreiem Zugriff werden durch das Wort RELA¬ 
TIVE als Dateityp gekennzeichnet. In den Schreib- und Lesebefeh¬ 
len ist statt der Variablenliste REC satznummer einzusetzen. 


Besonderheiten 

Das TI-BASIC enthält noch einige besondere Befehle, mit denen 
der Computer im Direktbetrieb als »Formelrechner«, d. h. wie ein 
programmierbarer Taschenrechner, verwendet werden kann. 
Zur Korrektur von Programmzeilen kann ein Zeileneditor angeru¬ 
fen werden. 
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6. Fehlende BASIC-Befehle 
ersetzen 


Wie Kapitel 5 zeigt, sind einige BASIC-Befehle nicht in allen 
BASIC-Dialekten vorhanden. Wer ein für einen fremden Compu¬ 
ter geschriebenes Programm auf seinem Gerät zum Laufen bringen 
will, muß darum wissen, wie er sich gegebenenfalls helfen kann, 
wenn sein Computer einige fremde Befehle nicht ausführt. 

Leider gibt es aber auch BASIC-Befehle, die nicht zu ersetzen sind. 
Dies kann daran liegen, daß die Hardware der einzelnen Computer 
nicht übereinstimmt. Es kann aber auch an unterschiedlicher 
Betriebs-Software und einfach an mangelndem Wissen über den 
inneren Aufbau von Hard- und Software liegen. 

Dieses Kapitel gibt Hinweise, wo ein Umschreiben von Befehlen 
leicht möglich ist, und wo man andere Wege bei einer Programm¬ 
konvertierung suchen muß. 

6.1 Ersatz fehlender Programm¬ 
anweisungen 
IF...THEN...ELSE 

Das Befehlswort ELSE in einem Entscheidungsbefehl als Verzwei¬ 
gungsanweisung wird von vielen BASIC-Dialekten nicht verstan¬ 
den. Programme, die diesen Befehl enthalten, können aber umge¬ 
schrieben werden, wie das folgende Beispiel zeigt. 


100 IF A;>0 THEN PRINT"quf'ELSE PRINT’‘schl echt* * 

100 IF A>0 THEN PRINT"aut": GOTO 120 
110 PRINT"schlecht" 

120 . 


Es ist lediglich eine Zeile mit der Anweisung für falsches Ver¬ 
gleichsergebnis hinzuzufügen und die Anweisung für richtiges 
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Ergebnis mit einem Sprungbefehl abzuschließen, durch den die 
Zeile mit der Anweisung für »falsch« bei wahrem Vergleich über¬ 
sprungen wird. 

LINE INPUT 

Bekanntlich können mit dem INPUT-Befehl bestimmte Sonderzei¬ 
chen wie Komma, Doppelpunkt usw. nicht eingegeben werden. Bei 
einigen BASIC-Versionen gibt es darum noch den LINE INPUT- 
Befehl, mit dem eine Zeichenkette auch mit allen Sonderzeichen 
erstellt werden kann, bis RETURN die Eingabe beendet. Bei die¬ 
sem Befehl bleibt auch die Wirkung der Löschtaste erhalten. 


100 

LINE INPUT 

A$ 


1 10 

PRINT A* 



100 

E«=INKEY$; 

IF E*=*'" THEN 

100 

110 

PRINT E»;: 

A$=A*+E* 


120 

IF ASC(E*) 

=8 THEN A!|i=LEFT«(A»,LEN(A$>-2) 

130 

IF ASC(E$) 

=13 THEN PRINT 

AU: GOTO 150 

140 

GOTO 100 
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LINE INPUT läßt sich durch ein kleines Programm, das den 
GET- oder den INKEY$-Befehl verwendet, ersetzen. Normaler¬ 
weise holt INKEYS oder GET nur jeweils ein Zeichen. Wenn man 
einen String eingeben will, muß dieser zusammengesetzt werden. 
Dabei ergibt sich die Schwierigkeit, daß bei einer Falscheingabe mit 
der Löschtaste zwar ein Zeichen auf dem Bildschirm gelöscht wird, 
in der gespeicherten Zeichenkette aber stehenbleibt. 

Wenn die Löschtaste betätigt wurde - hier ASCII-Code 8 - wird 
die Zeichenkette um zwei Zeichen verkürzt, denn außer dem zu 
löschenden Zeichen muß auch noch der Löschcode entfernt wer¬ 
den. Die RETURN-Taste mit dem Code 13 dient zum Abbruch 
der Schleife zum Zusammensetzen von AS. 

PRINT USING 

Der oft sehr nützliche Befehl für Rundung und formatierte Aus¬ 
gabe kann auch durch andere Befehle ersetzt werden. Es gibt hier¬ 
für eine ganze Reihe von Programmvorschlägen. Einer davon wird 
im folgenden gezeigt. 

100 PRINT TAB(20) USING A 

100 A$=STR$(INT(A*100+.5)> 

110 L=LEN(A«) 

120 A$=LEFT* (A$, L-2) +" . "+RIGHT1; (A», 2) 

130 PRINT TAB(20-L)j A» 
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Entsprechend dem PRINT USING-Befehl soll die Variable A mit 
4 Vorkomma- und 2 Nachkommastellen ausgegeben werden. In 
Zeile 100 wird sie mit 100 multipliziert, dann zur Rundung 0,5 
addiert und daraus die Ganzzahl gebildet. Das Ergebnis wird mit 
Hilfe der STR$-Funktion in eine Zeichenkette gewandelt. 

In Zeile 120 werden die beiden letzten Stellen abgetrennt; sie bilden 
die Nachkommastellen der eingegebenen Zahl, während der Rest 
den Ganzzahlwert darstellt. Nun braucht nur noch eine Zeichen¬ 
kette zusammengesetzt zu werden, die aus diesen beiden Teilen 
und dem Zeichen für die Dezimaltrennung besteht. Ausgegeben 
werden muß dann die zusammengesetzte Zeichenkette an einer 
berechneten Tabulatorposition. 

Wenn die formatierte Ausgabe mehrfach gebraucht wird, ist es 
zweckmäßig, hierfür ein Unterprogramm zu schreiben. 

DEF FN 

Viele BASIC-Dialekte bieten dem Benutzer die Möglichkeit, 
Rechenausdrücke als Funktionen im Programm zu definieren und 
diese dann durch Kurzbefehle aufzurufen. Wenn dieser Befehl bei 
einer BASIC-Version nicht vorhanden ist, sollte man bei einer 
beabsichtigten Programmkonvertierung zunächst untersuchen, wie 
oft die zu definierende Funktion vorkommt. Wenn dies nur ein- 
oder zweimal der Fall ist, wird es meist einfacher sein, in die betref¬ 
fenden Programmzeilen statt des Funktionsaufrufs den Rechenaus¬ 
druck selbst zu schreiben. 


100 

DEF FN K(D)=3.14159*D*D/4 

110 

INPUT A 

120 

PRINT FN K(A) 

100 

INPUT A 

110 

K = 3.14158*A*A/4 

120 

PRINT K 


Wenn es sich aber um einen sehr komplexen Ausdruck handelt, 
oder wenn die Rechnung oft gebraucht wird, kann auch ein ent¬ 
sprechendes Unterprogramm geschrieben werden. 


Der MOD-Operator 

Einige BASIC-Versionen kennen einen besonderen Operator zur 
Bestimmung des Divisionsrests. Wird dieser gebraucht, kann man 
einfach einen Ersatzbefehl formulieren. 
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100 PRINT 2345 MOD 40 

100 PRINT 2345-40*INT(2345/40) 


Wie ZU erkennen ist, wir(d der Ganzzahlwert des Quotienten mit 
dem Divisor multipliziert. Das Ergebnis, vom Dividenden abgezo¬ 
gen, ergibt den Rest. Ein falsches Ergebnis entsteht aber bei negati¬ 
vem Dividenden. Bei vielen BASIC-Versionen gibt es noch die 
FIX-Funktion. Wird diese statt INT eingesetzt, sind die Ergebnisse 
auch im negativen Bereich richtig. Wenn die FIX-Funktion nicht 
vorhanden ist, muß bei negativen Zahlen zum Ergebnis noch + 1 
addiert werden. 


WHILE ... WEND und REPEAT... UNTIL 

Einige BASIC-Dialekte bieten neben FOR...NEXT weitere 
Befehle zum Aufbau von Schleifen. Für die Bildung einer Schleife, 
bei der die Abbruchbedingung zu Beginn geprüft wird, aber keine 
Veränderung einer Laufvariablen stattfindet, werden die auch in 
anderen Programmiersprachen üblichen Befehle WHILE und 
WEND verwendet. Die gleiche Konstruktion kann leicht mit dem 
IF. . . THEN-Befehl aufgebaut werden. 


100 

F = 1 

110 

WHILE F < 1000 

120 

A = A+1 : F = F*A 

130 

PRINT A 

140 

WEND 

100 

F = 1 

110 

IF F>=1000 GOTO 150 

120 

A = A+1 : F = F*A 

130 

PRINT F 

140 

GOTO 110 

150 

. . . 


In der Schleife werden die Fakultäten gerechnet, und die Schleife 
wird abgebrochen, wenn ein Ergebnis über 1000 vorliegt. Bei 
Befehlsschreibung mit IF. . .THEN muß lediglich der Vergleichs¬ 
operator geändert werden. 

Ähnliches gilt für die andere, gelegentlich verwendete Schleifen¬ 
konstruktion mit den Befehlen REPEAT. . .UNTIL. Hier muß 
die Abbruchsbedingung nach UNTIL formuliert werden; sie wird 
am Schluß des Schleifenlaufs geprüft. 
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100 

F = 1 

110 

REPEAT 

120 

A = A+1 : F = F$A 

130 

PRINT F 

140 

UNTIL F>= 1000 

100 

F = 1 

1 10 

A = A+1 : F = F*A 

120 

PRINT F 

130 

IF F>=1000 GOTO 150 

140 

GOTO 110 

150 

. . . 


Der Tauschbefehl SWAP 

Der bei neueren BASIC-Dialekten oft vorhandene Befehl SWAP, 
mit dem der Tausch zweier Variablen veranlaßt werden kann, ist 
für Sortiervorgänge gut zu verwenden. Er kann aber auch ersetzt 
werden, wenn man noch eine Hilfsvariable einführt. 


100 SWAP A.B 

100 C=A : A=B : B=C 


LOCATE oder PRINT AT 

Für eine bedienerfreundliche Bildschirmgestaltung ist es wichtig, 
den Cursor durch Programmbefehle an bestimmte Bildschirmposi¬ 
tionen setzen zu können, ohne daß dadurch andere Teile gelöscht 
werden. Bei einigen Dialekten können hierfür die Codes der 
Cursortasten in Zeichenketten gespeichert und dann mit PRINT- 
Befehlen im Programm zur Wirkung gebracht werden. Bei dieser 
Methode entstehen aber unschöne Ausdrucke im Listing, wenn die 
Codes überhaupt vom Drucker beachtet werden. Neuere Dialekte 
verwenden darum den LOCATE-Befehl mit nachfolgender Zeilen- 
und Spaltennummer zur Positionierung des Cursor. 

Zwei einfache Methoden gibt es, den LOCATE-Befehl zu er¬ 
setzen. 


100 

LOCATE 

Z,S: PRINT"Humboldt" 


100 

CLEAR 

1000: PRINT CHR^<2B); 


110 

FÜR k 

= 1 Tü Z: PRINT CHR»(26);; 

: NEXT 

120 

FOR K 

= 1 TO S: PRINT CHR$(25);; 

: NEXT 

130 

PRINT 

"Humboldt" 
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In praktisch allen BASIC-Dialekten gibt es Steuercodes für die 
Bewegung des Cursor. Diese können in eine Schleife geschrieben 
werden, die so oft laufen muß, wie Schritte in vertikaler und hori¬ 
zontaler Richtung notwendig sind. Wichtig ist, daß die PRINT- 
Befehle mit einem Semikolon abgeschlossen werden, um den sonst 
üblichen Zeilenvorschub zu verhindern. Ob die beiden Steuercodes 
auch in einen Befehl geschrieben werden können, muß ausprobiert 
werden. 

Wenn die STRINGS-Funktion vorhanden ist, die jeweils eine Zei¬ 
chenkette mit einer bestimmten Anzahl gleicher Zeichen erzeugt, 
kann man diese ebenso zum Ersatz von LOCATE verwenden. 


100 

CLEAR 

1000: PRINT CHR*(28); 

1 10 

PRINT 

STRING*(Z,26 )f 

120 

PRINT 

STRING*(S,25)j 

1 30 

PRINT 

"Humboldt" 


6.2 Ersatz fehlender Funktionen 

Die wirklich benötigten Funktionen sind praktisch bei allen 
BASIC-Dialekten vorhanden. Man wird darum nur selten Anlaß 
haben, etwas umzuschreiben, wenn man Programme konvertieren 
will. Trotzdem gibt es auch hier Ausnahmen. 

Zeichenkettenveränderung 

Es gibt einige Dialekte, bei denen die Funktionen LEFT$ und 
RIGHTS fehlen. Sie lassen sich aber gut mit Hilfe der MID$- 
Funktion (die auch SEG$ heißen kann) und der LEN-Funktion 
ersetzen. 


100 At="Humboldt Taschenbuchverlao" 
110 PRINT LEFT*(A$,8) 

120 PRINT RIGHT*(A$,17)• 

RUN 

Humboldt 

T aschenbuchver 1 aq 
READY 

100 A*="Humboldt Taschenbuchverlaq" 
110 PRINT MID*(A*,1,8) 

120 PRINT MID*(A*,LEN(A*)-16) 

RUN 

Humboldt 

T aschenbuchver1aq 
READY 
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Auch wenn (z. B. beim Atari und Sinclair) statt der MID$-Funk- 
tion eine andere Möglichkeit für die Aufteilung von Zeichenketten 
besteht, kann LEFT$ und RIGHTS immer ersetzt werden. Es ist 
zu schreiben: 

beim Atari statt LEFT$(A$,z) ^ A$=A$(l,z) 

statt RIGHT$(A$,z) ^ A$=A$(LEN(A$)-z- 
+1,LEN(A$)) 

beim statt LEFT$(A$,z) A$=A$(1 TO z) 

Spectrum 


statt RIGHT$(A$,z) A$=A$(LEN A$-z+l 
TO LEN A$. 


Die STRINGf-Funktion 

Mit Hilfe dieser Funktion kann eine Reihe gleicher Zeichen in eine 
Zeichenkette gesetzt werden. Wenn sie nicht vorhanden ist, kann 
man sie durch eine FOR...NEXT-Schleife ersetzen. 


100 

PRINT 

STRING*(40. 



o 

o 

FDR K 

= 1 TG 40: 

PRINT"*"; 

: NEXT: PRINT 


Die INSTR-Funktion 

Mit dieser Funktion wird untersucht, an welcher Stelle einer Zei¬ 
chenkette eine andere Zeichenkette, die darin enthalten ist, beginnt. 
Die Funktion wird nicht sehr häufig benötigt. Wenn sie gebraucht 
wird, ist sie durch eine Schleife unter Verwendung von MIDI 
leicht zu ersetzen. 


100 

A*="Ta5Chenbuchver1ag" 

1 10 

B*="buch" 

120 

PRINT INSTR(A*,B*) 

RUN 


0 


READY 

lOO 

A*="1aschenbuchverlaq" 

110 

B*="buch" 

120 

FOR k = 1 lU LEN(A*) 

130 

IF MID*(A*.K.LEN<b*))=b* THEN PRINT K: END 

140 

NEXT 

RUN 


0 


READY 
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Die SPC-Funktion 

In einigen BASIC-Dialekten fehlt die SPC-Funktion, mit der eine 
bestimmte Anzahl von Leerstellen in PRINT-Befehlen erzeugt 
werden kann. Sie ist gegebenenfalls durch die universellere 
STRINGS-Funktion zu ersetzen. 


1 cjO PR I NT SRC (10);" Han s " 

100 PRINT STRING*(10,32);"Hans" 


6.3 Wo kaum Befehlsersatz 
möglich ist 

Beim Umschreiben von Programmen wird man aber auch auf 
Befehle stoßen, die nicht zu ersetzen sind. Einige davon kann man 
einfach weglassen, andere lassen sich nur mit erheblichem Aufwand 
umgehen. 


Befehle, die fortfallen können 

Entbehrlich sind ohne Folgen alle Befehle, die nur negative Bild¬ 
schirmausgabe erzeugen (wie zum Beispiel INVERSE) und die 
wieder zurückschalten (wie NORMAL). Das gleiche gilt für als 
Negativzeichen dargestellte Steuerkommandos (z. B. negatives R 
für REVERSE beim Commodore). 

Mit gewissen Einschränkungen gilt dies auch für reine Formatie¬ 
rungsbefehle wie PRINT AT, LOCATE usw., wenn diese nur im 
Programm stehen, um die Ausgabe gefälliger erscheinen zu lassen. 
Man kann das Programm zunächst ohne diese Befehle zum Laufen 
bringen und dann später mit den Befehlen des eigenen Computers 
eine bessere Bildschirmgestaltung programmieren. 

Es gibt allerdings auch Formatierungsbefehle, die für den ord¬ 
nungsgemäßen Lauf eines Programms unerläßlich sind. Meist han¬ 
delt es sich um Befehle, die den Cursor nach oben oder nach links 
bewegen. Beim Aufbau zum Beispiel einer Eingabemaske kann 
man auf sie nicht verzichten. 

Weggelassen werden kann der nur selten verwendete Befehl 
OPTION BASE. 
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Befehle, die ganz umgeschrieben werden müssen 

Schwierig wird es, wenn in einem Programm Grafik-Befehle ste¬ 
hen. Manchmal können diese durch die Grafik-Befehle des eigenen 
Computers ersetzt werden. Aber oft ist es zweckmäßiger, zu 
ergründen, was eigentlich auf dem Bildschirm geschehen soll, und 
dann zu entscheiden, ob dieser Teil entfallen kann. 

Unangenehm sind POKE- und PEEK-Befehle. Manchmal kann 
man sie weglassen, wenn damit nur Computerfunktionen umge¬ 
schaltet werden. Sie können aber auch eine wichtige Bedeutung für 
das Programm haben; und dann enden meist alle Bemühungen. 
Nur wenn die Bedeutung der Befehle im Programm erklärt ist, 
oder wenn der Inhalt der angesprochenen Adressen bekannt ist, 
können sie durch Befehle des eigenen Computers ersetzt werden. 

Umschreiben der Befehle ist häufig notwendig, wenn ein Drucker 
im Programm angesprochen werden soll, denn nicht alle BASIC- 
Dialekte kennen den hierfür vielfach verwendeten LPRINT-Befehl 
und verlangen statt dessen die Öffnung eines Ausgabekanals zum 
Drucker. 

Fast stets vollständig zu ändern sind Befehlsfolgen, mit denen ein 
externer Speicher angesprochen wird (beginnend immer mit 
OPEN). Auch wenn vielfach bei den einzelnen Dialekten die glei¬ 
chen Befehlswörter verwendet werden, gibt es doch in der Syntax 
bemerkenswerte Unterschiede. 

Arbeit erfordert die Umstellung, wenn im Programm der Befehl 
RESTORE mit nachfolgender Zeilennummer verwendet wird und 
auf dem eigenen Computer nur der einfache RESTORE-Befehl zur 
Verfügung steht. Es ist dann notwendig, den Ablauf beim Lesen 
der DATA-Zeilen genau zu prüfen und gegebenenfalls zusätzlich 
DATA-Zeilen in das eigene Programm zu schreiben. 

Werden in einem Programm mit dem Befehl KEY Funktionstasten 
definiert, ist eine erhebliche Programmänderung notwendig, wenn 
der eigene Computer keine solche Tasten hat. Man kann dann 
Abfragen mit GET oder INKEY$ einbauen und andere sonst nicht 
verwendete Tasten als Funktionstasten programmieren. 

Wo kaum etwas zu machen ist 

Wenn ein Computer keinen Zeitzähler besitzt, ist es ohne zusätzli¬ 
che Hardware nicht möglich, Zeitsignale zu verarbeiten, es sei 
denn, man verzichtet während der Zeitbestimmung auf andere 
Computerarbeit. 
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Kaum zu ersetzen sind die Befehle für die Fehlerbehandlung, wenn 
der eigene Computer nicht dafür eingerichtet ist. 

Als fast unmöglich erweist sich eine Konvertierung, wenn im Pro¬ 
gramm Routinen der Maschinensprache des dort verwendeten 
Interpreters abgerufen werden. Nur in seltenen Fällen sind diese 
bekannt. Man kann nur versuchen, den Zweck der Routine zu 
erraten und dafür etwas Entsprechendes für den eigenen Computer 
schreiben. 

Auch wenn in einem Programm die Funktion VARPTR verwendet 
wird, handelt es sich immer um einen trickreichen direkten Spei¬ 
cherzugriff, der nur durch Befehle in Maschinensprache ersetzt 
werden kann. 

6.4 Hilfen für Zahlenwandlungen 

In BASIC können bei Rechenaufgaben usw. Dezimalzahlen einge¬ 
geben werden, und der Computer antwortet auch in diesem Zah¬ 
lensystem. Die Umrechnung in Binärzahlen, mit denen er allein 
rechnen kann, erfolgt selbsttätig. Für gewisse Programmieraufga¬ 
ben benötigt man aber auch Hexadezimal- oder Binärzahlen. 
Einige BASIC-Dialekte bieten darum die Möglichkeit, Binär- oder 
Hexadezimalzahlen einzugeben oder Zahlen aus einem System in 
ein anderes zu wandeln. 

Da diese Befehle aber nicht allgemein vorhanden sind, dürfte ein 
kleines Programm für die Zahlenwandlung von Interesse sein. 

Zur Wandlung einer Dezimalzahl in ein anderes System eignet sich 
besonders die Divisionsmethode, die beispielsweise bei der Dez- 
Bin-Wandlung der Zahl 123 wie folgt arbeitet. 

123/2 = 61 Rest 
61/2 = 30 Rest 
30/2 = 15 Rest 
15/2= 7 Rest 
7/2= 3 Rest 
3/2= IRest 

ergibt Binärzahl 

Es ist zu erkennen, daß die Dezimalzahl so lange durch 2 geteilt 
wird, bis keine Teilung mehr möglich ist. Bei jeder Teilung wird 
der Rest notiert, der - in umgekehrter Reihenfolge gelesen - die 
Binärzahl ergibt. 
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Ein BASIC-Programm, das diese Methode verwendet, kann wie 
folgt aussehen: 


10 INPUT"Dezi mal zahl "jD 
20 R = D-2*lNT(D/2) 

30 D = INT(D/2) 

AO = STR»(R)+B^ 

50 IF D <> O THEN 20 
60 PRlNT"Binärzahl=" 


Eingabe Dez-Zahl 
Berechnung Divisionsrest 
neuer Dividend 
Zusammensetzung Bin-Zahl 
Bedingung für Schleifenabbruch 
Ausgabe Bin-Zahl 


In etwas abgewandelter Form kann die gleiche Methode auch zur 
Dez-Hex-Wandlung verwendet werden. Hierfür ist es notwendig, 
am Anfang des Programms eine Zeichenkette aus allen Hexadezi¬ 
malzahlen zu bilden, um den Wert der Ziffernsymbole auf einfache 
Weise zu bestimmen. 


10 Z*="0123456789ABCDEF" 
20 INPUT"Dezi malzahl" 5 D 
30 R = D-16*INT(D/16) 

40 D = INT(D/16) 

50 C$ = MID* (ZHi,R-»-l. 1) 

60 H* = C* + H* 

70 IF D <> O THEN 30 
80 PRINT"Hex-Zahl = "|H* 


String mit allen Hex-Ziffern 
Eingabe Dez-Zahl 
Berechnung Divisionsrest 
neuer Dividend 
Bestimmen der Hex-Ziffer 
Zusammensetzen Hex-Zahl 
Abbruchbedingung 
Ausgabe Hex-Zahl 


Für die Wandlung von Binär- oder Hexadezimalzahlen in Dezi¬ 
malzahlen ist die Additionsmethode gut geeignet, die wie folgt 
arbeitet: 

1 2 3 4 5 6 7 8 ^Stelle 

7654321 0 ^Exponent 


0 11110 11 = Binärzahl 
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Es ist zu erkennen, daß einfach die Dezimalwerte jeder Stelle zu der 
zu wandelnden Zahl addiert werden. 

Ein BASIC-Programm, das nach dieser Methode arbeitet, kann wie 
folgt aussehen: 


10 INPUT**Binär 2 ahl "rB» 

20 FÜR K = 1 Tü LEN(B*) 

30 IF MID1;(B<,K, 1)='’0" THEN 50 
40 D = D+2Ä(LEN(B$)-K) 

50 NEXT 

60 PRINT"Dez-Zahl =";D 


Eingabe Bin-Zahl 
jede Stelle einzeln prüfen 
wenn Stelle 0, keine Rechnung 
Rechnung und Summe Stellenwert 

Ausgabe Dez-Zahl 


Da in der MID$-Funktion die Stellen von links beginnend gezählt 
werden, kann die Laufvariable K dort als Stellenzähler verwendet 
werden. Im Rechenausdruck muß aber der Komplementwert von 
K als Exponent eingesetzt werden. 

Diese Methode läßt sich auch für die Hex-Dez-Wandlung ver¬ 
wenden: 


10 Z$="01234567B9ABCDEF" 

20 INPUT"Hexadezimalzahl"jHt 
30 FÜR J = 1 TO LEN(H$) 

40 FÜR K = 1 TO 16 
50 IF MID»(Z^,K,1) <> 
MID4i(H<t, J, 1) THEN 70 
60 D=D+(K-1)♦16Ä<LEN(H$)-J) 
70 NEXT K 
80 NEXT J 

90 PRINT"De 2 -Zahl =":D 


String mit allen Hex-Ziffern 
Eingabe Hexzahl 
alle Hex-Stellen bearbeiten 
Hex-Ziffernsymbole durchsuchen 
wenn Symbol Im String gefunden, 
dann rechnen 
Berechnung Stellenwert 

Ausgabe Dez-Zahl 


Man kann die beiden Wandlungsmethoden leicht in einem Pro¬ 
gramm zusammenfassen, das dann alle möglichen Umwandlungen 
durchführt. In unserem Programm, Abb. 14, sind die folgenden 
Variablen verwendet: 


s 

Anzahl der Ziffernsymbole im Zahlensystem 

D 

Dezimalzahl 

A 

Hilfsvariable 

R 

Divisionsrest 

X 

Feldindex für Bezeichnung der Zählsysteme 

J.K 

Laufvariable 

z$ 

String mit Ziffernsymbolen 


String für Hex- oder Bin-Zahl 
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x$ 

c$ 

S$(x) 


leere Eingabevariable 
Hilfsvariable 

Feld für Bezeichnung der Zählsysteme, 


Je nach Wunsch kann eine Dezimal-, eine Hexadezimal- oder eine 
Binärzahl eingegeben werden. Erstere wird in eine Hexadezimal¬ 
zahl, die beiden anderen werden in Dezimalzahlen umgerechnet. 
Die zweite Wandlung erfolgt, wenn nach der Ausgabe von »Wei¬ 
ter?« eine Taste angeschlagen wurde. 

Um das Programm kurz zu halten, ist keine Hex-Bin- und keine 
Bin-Hex-Wandlung programmiert. Beides erfolgt über die Dezi¬ 
malzahlen. Da es hierbei Rundungsfehler geben kann, wird in den 
Zeilen 320 und 420 ein Korrekturwert hinzuaddiert. 


iO REM Zahlenwandlunaen ZAHLWAND 
20 CLEAR 2000 ; Zt='‘0123456789ABCDEF" 

30 DATA"De 2 .Zahl ","Hex.Zahl ","Bin.Zahl " 

40 FÜR K=1 TO 3: READ SIKK): NEXT 
100 CLS: PRINT"Batte wählen Sie" 

110 PRINT"! Dezimalsahl einqeben" 

120 PRINT"2 Hexadezimal zahl einqeben" 

130 PR INT"3 Binärzahl einqeben" 

140 PRINT"4 Proaramm beenden 
150 INPUT X 

160 ON X GOTO 200,300,400,180 
170 GOTO 100 
180 END 

200 PRINT S$(X)::INPUT D 

210 S=16: A=D: H»="": X=2: GOSUB 600 

220 S=2: A=D: H$="": GOSUB 600 

230 GOTO 100 

300 PRINT S^(X);:INPUT H* 

310 D=0: S=16: X=l: GOSUB 700 

320 S=2: A=D-*-.5 : Ht="": X=3: GOSUB 600 

330 GOTO 100 

400 PRINT S1i(X);: INPUT H« 

410 D=0: S=2: X=l: GOSUB 700 

420 S=16: A=D+.5: H»="": X=2: GOSUB 600 

430 GOTO 100 

600 R=A-S»INT(A/S> 

610 A=INT(A/S) 

620 C*=MID4i (Z*,R+1 , 1) 

630 H» = C*+H* 

640 IF A <> O THEN 600 
650 PRINT S1J(X);H» 

660 INPUT"Weiter":X*: RETURN 
700 FOR J = 1 TO LEN(H*) 

710 FOR K = 1 TO S 

720 IF MID*(Z*,K,1) <> MID*<H*,J,1) THEN 740 
730 D=D + (K-1) * SÄ(LEN<H*)-J) 

740 NEXT K 

750 NEXT J 

760 PRINT S*(X);D 

770 INPUT"Weiter";X*: RETURN 


Abb. 14: Programm zur Wandlung von Zahlen in andere Zählsy¬ 
steme 


157 



7. Hilfreiche BASIC- 
Routinen verstehen 


Die Sprachelemente von BASIC erlauben es, anstehende Program¬ 
mieraufgaben auf sehr verschiedene Weise zu lösen. Man kann 
trickreich und effektiv, aber auch umständlich und langatmig pro¬ 
grammieren. Wenn zu viele Programmtricks zur Anwendung kom¬ 
men, wird ein Programm unverständlich, was aber auf keinen Fall 
heißt, daß jeder umständliche Programmaufbau auch gut verständ¬ 
lich ist. 

In diesem Kapitel erklären wir einige BASIC-Routinen, die mög¬ 
licherweise nicht gleich auf den ersten Blick verständlich sind. Sie 
können bei Bedarf leicht in eigene Programme eingebaut werden 
und dann andere, viel längere Befehlsfolgen ersetzen. 


7.1 Aufforderungen zu Eingaben 
und deren Verarbeitung 

Programm anhalten 

Im Dialog mit dem Computer ist es oft erwünscht, dem Bedienen¬ 
den Zeit zu geben, eine Anzeige genau zu lesen. Wenn die Darstel¬ 
lung mehr Zeilen umfaßt, als auf einem Bildschirm darstellbar sind, 
hilft ein kleines Programm, den Computer warten zu lassen. 


100 FOR K = 1 TO 50 

110 IF K/15=INT(K/15) THEN INPUT X» 
120 PRINT AS(K> 

130 NEXT 


In Zeile 110 wird geprüft, ob der Schleifenzähler einen Wert 
erreicht hat, der eine Teilung durch 15 ohne Rest zuläßt. Denn 
dann ist das Ergebnis der Division eine Ganzzahl. Wenn dies der 
Fall ist, kommt der INPUT-Befehl zur Wirkung. Die dort ste¬ 
hende String-Variable hat keinerlei Bedeutung und dient, wie man 
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im Englischen sagt, als Dummy. Nach Betätigung einer beliebigen 
Taste läuft das Programm weiter und gibt wieder 15 Zeilen aus. 

Falls der verwendete BASIC-Dialekt nach einem INPUT-Befehl 
das Programm abbricht, wenn nur die RETURN-Taste betätigt 
wurde, muß statt INPUT der GET-Befehl verwendet werden. Im 
allgemeinen ist aber INPUTeinfacher. 


J a/Nein-Abfragen 

Wenn der unterschiedliche Ablauf eines Programms durch eine Ja/ 
Nein-Abfrage gesteuert werden soll, kann es zweckmäßig sein, 
einen Ablauf zu bevorzugen. In diesem Fall braucht nur eine Ein¬ 
gabe geprüft zu werden. Jede andere Eingabe bewirkt dann den 
alternativen Programmlauf. 


100 INPUT"Drucker vorbereitet <J>":X* 
110 IF THEN 500 

120 GOTO 100 


Andere Überlegungen gelten, wenn sichergestellt werden soll, daß 
auch mehrere mögliche Eingaben vom Computer richtig erkannt 
werden. Das folgende Programm wertet die Eingaben j, J, ja und 
JA als Ja-Eingabe, ohne daß 4 Oder-Verknüpfungen notwendig 
sind. Denn die ASC-Funktion liefert immer nur den ASCII-Wert 
des ersten Zeichens eines Strings. 


100 

INPUT"Drucken' 

•: X* 



110 

IF ASC(X*)=74 

OR ASC<X4i) = 106 

THEN 

200 

120 

IF ASC(X*)=78 

OR ASC(X«)=110 

THEN 

300 

140 

GOTO 100 





Menüauswahl mit Buchstaben 

Wenn mehrere Wahlmöglichkeiten geboten werden, ist die Menü- 
Technik zweckmäßig. Am einfachsten wird das Programm, wenn 
der Benutzer aufgefordert wird, vor den Menü-Positionen ste¬ 
hende Kennziffern einzugeben. Diese können dann direkt in einem 
ON...GOTO-Befehl verwendet werden. 

Die Bedienung wird allerdings etwas erleichtert, wenn statt der 
Zahlen kennzeichnende Buchstaben als Eingabe verwendet werden 
können. Für die Umsetzung der Buchstaben in die beim 
ON...GOTO-Befehl notwendigen Zahlen ist folgendes Programm 
nützlich: 
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9 REM Menüauswahl mit Buchstaben 


100 PRINT"M e 
110 PRINT” 

120 PRINT" 

130 PRINT" 

140 PRINT" 

150 PRINT" 

160 INPUT Xi 
170 Yi="BLANE' 
180 FÜR K = 1 


TO 


auswahl": 

Bearbeiten 

Löschen 

An-f üqen 

Neueinrichten 

Ende 


MENUWAHL 

PRINT 


190 IF Xi=MIDi(Yi,K,1) THEN 300 

200 NEXT: PRINT"Un 2 ulässige Eingabe": GOTO 100 
300 ON K GOTO 1000,2000,3000,4000,5000 
1000 ' Unterprogramm -für Bearbeiten 
2000 'Unterprogramm für Löschen 
3000 •' usw 


In der Schleife wird geprüft, ob der eingegebene Buchstabe mit 
einem Buchstaben des aus den erlaubten Eingabebuchstaben gebil¬ 
deten Strings Y$ übereinstimmt, und dann die Schleife abgebrochen. 
Die Laufvariable wird dann im ON...GOTO-Befehl verwendet. 

Noch einfacher ist diese Programmaufgabe zu lösen, wenn die 
INSTR-Funktion zur Verfügung steht. 


180 •- 

190 ON INSTR(Y$.X$> GOTO 1000.2000.3000.. 
200 PRINT''Unzul ässige Einaabe": GOTO 100 


Diese Funktion liefert den Platz, an dem der String X$ in Y$ 
beginnt. 


Wandlung von Klein- in Großbuchstaben 

Um bestimmte Daten nach dem Alphabet zu sortieren, müssen 
diese einheitlich entweder mit großen oder mit kleinen Buchstaben 
geschrieben sein. Bei vielen Computern gibt es darum auch eine 
Möglichkeit, die Tastatur so zu schalten, daß nur Großbuchstaben 
erzeugt werden. Wenn dies nicht vorgesehen ist, kann das folgende 
Hilfsprogramm zur Wandlung einheitlich in Kleinschrift nützlich 
sein: 


10 REM Kl ein-Großwandlung KLEGROWA 
90 INPUT"Gemischter String";G* 

100 FÜR K = 1 Tü LEN(G$) 

110 H$=MID*(G»,K,1) 

120 IF ASC(H*) < 97 THEN Ct=H*: GOTO 150 
130 X = ASC(H$) -32 
140 C* = CHR*(X) 

150 A*=A*+C* 

160 NEXT 
170 PRINT AS 
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In der Schleife wird jeweils ein Zeichen von dem gemischt eingegebe¬ 
nen String abgetrennt und untersucht, ob der dazugehörige ASCII- 
Code kleiner als 97 ist (denn dann muß es sich um einen Groß¬ 
buchstaben handeln). Wurde ein größerer ASCII-Wert festgestellt, 
muß dieser um 32 erniedrigt werden, da dies den Unterschied zwi¬ 
schen Groß- und Kleinbuchstaben im ASCII-Code ausmacht. Es 
wird dann eine neue Zeichenkette aus den Einzelzeichen gebildet, 
wobei der aktuell berechnete ASCII-Code vorher noch in ein Zei¬ 
chen gewandelt werden muß. 

7.2 Bildschirmausgaben positionieren 

Überschriften zentrieren 

Oft ist es erwünscht, eine Überschrift oder ähnliches genau in die 
Mitte einer Bildschirmzeile zu setzen. Hierfür empfiehlt sich die 
Verwendung der TAB-Funktion mit einem Rechenausdruck als 
Argument. 


50 AS="Proqrammwahl" 

100 PRINT TAB(32-LEN(At)/2>:A* 


Der auszugebende Text muß in einer Zeichenkettenvariablen vor¬ 
liegen. Als Tabulatorwert wird die halbe Länge der Kette von der 
mittleren Bildschirmposition (hier also 32 bei 64 Zeichen/Zeile) ab¬ 
gezogen. 


Rechtsbündige Ausgabe 

Normalerweise werden Zahlen rechtsbündig und Texte linksbün¬ 
dig auf den Bildschirm gesetzt. Wenn die rechtsbündige Ausgabe 
von Zeichenketten gewünscht wird, verwendet man oft die fol¬ 
gende kleine Routine, die hier in einer Schleife steht: 


50 L$=" 

.. 

100 

FOR K 

II 

H 

□ 

cn 

1 10 

INPUT 

A* 

120 

B»=RIGHT«(L*+AS,15) 

130 

PRINT 

B% 

140 

NEXT 



Benötigt wird eine Zeichenkette, die nur eine Anzahl von Leerstel¬ 
len enthält. Sie kann entweder mit der STRINGS-Funktion oder, 
wie im Beispiel in Zeile 50, als L$ gebildet werden. Der Ausgabe¬ 
string B$ wird dann aus L$ und dem Eingabestring A$ zusammen¬ 
gesetzt, hiervon mit RIGHT$ die benötigte Länge abgetrennt. 
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Formatierte Zahlenausgabe 

Praktisch alle BASIC-Dialekte besitzen die Fähigkeit, auch 
Rechenausdrücke als Argument in der TAB-Funktion zu akzeptie¬ 
ren. Dies kann für formatierte Zahlenausgabe, bei der alle Dezimal¬ 
punkte untereinander stehen, verwendet werden. 


10 REM Formatierte Ausgabe FÜRMAUSZ 
50 INPUT'‘Punkt in welche Spalte";X 
100 INPUT"Beliebige Zahl";Z 
110 L=LEN(STR$(INT(Z>)) 

120 IF F1X(Z)=0 THEN L=L-1 
130 PRINT TAB(X-L);Z 
140 GGTG 100 


Hier werden zunächst die Dezimalstellen der auszugebenden Zahl 
mit der INT-Funktion weggestrichen. Dann wird die Ganzzahl mit 
STR$ in eine Zeichenkette gewandelt. Die Länge dieser Kette, mit 
LEN bestimmt, ergibt, von der Druckposition des Dezimalpunktes 
abgezogen, die Position, an der die Ausgabe der Ziffer zu beginnen 
hat. Hierdurch kommen alle Dezimalpunkte untereinander zur 
Ausgabe. Diese Routine kann noch durch eine Rundung ergänzt 
werden. Mit der INT-Funktion ist sie allerdings nur für positive 
Zahlen, mit FIX statt INT für alle Zahlen brauchbar. 


Zahlen in Kolonnen schreiben 

Mit dem Komma im PRINT-Befehl ist zwar bei allen BASIC- 
Dialekten eine Kolonnenbildung möglich, die Anzahl der Kolon¬ 
nen ist aber immer beschränkt. Wenn man eine größere Anzahl 
braucht, um z. B. viele kleine Zahlen auf einem Bildschirm darzu¬ 
stellen, kann folgendes Programm von Nutzen sein: 


10 REM Zahlen in Kolonnen KOLONNEN 
50 Z = 2 

100 FOR K = 1 TO 6 
110 Z=Z*3 

120 A$=*' "+STR»(Z) 

130 A$=RIGHT«(A«,5) 

140 PRINT A$j 
150 NEXT 


Die Schleife begrenzt die Anzahl der in einer Zeile darzustellenden 
Zahlen. Die Befehle in den Zeilen 50 und 110 dienen nur dazu, die 
Demonstrationszahlen zu erzeugen. In 120 wird ein String aus fünf 
Leerstellen und der in eine Zeichenkette gewandelten Ausgabezahl 
gebildet, der in 130 auf die Länge von 5 Zeichen beschnitten wird. 
Da der nachfolgende PRINT-Befehl, mit dem die Zeichenkette 
ausgegeben wird, am Schluß ein Semikolon hat, werden die Zahlen 
im Abstand von 5 Spalten auf den Bildschirm geschrieben. 
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Zeichnen eines Rahmens 

Um eine Menü-Darstellung oder eine Maske auf dem Bildschirm 
besser zu präsentieren, wird diese oft in einen Rahmen gesetzt. 
Man kann dies auf verschiedene Weise programmieren. Drei 
Methoden werden hier erklärt. 


10 REM Rahmen zeichnen RAHMEN 

100 CLS: FOR K=1 TO 64: PRINT"*":: NEXT 

110 FOR K=1 TO 14 : PRINT"*"TAB(63)"*";; NEXT 

120 FOR K=1 TO 63: PRINT"*";: NEXT 

130 A$="ALi+gabenübersicht" 

140 PRINTi i28+32-LEN(A*)/2,At: 

150 GOTO 150 

200 FOR K=15360 TO 15423 

210 POKE K,143 : NEXT 

220 FOR K=15360 TO 16320 STEP 64 

230 POKE K,191 : NEXT 

240 FOR K=15423 TO 16383 STEP 64 

250 POKE K,191 : NEXT 

260 FOR K=16320 TO 16383 

270 POKE K,143 : NEXT 

290 GOTO 290 

300 CLEAR(IOOO): R^=STRING«(62.143) 

310 PRINTi 1,R* 

320 FOR K=15360 TO 16320 STEP 64 

330 POKE K.191 : NEXT 

340 FOR K=15423 TO 16383 STEP 64 

350 POKE K,191 : NEXT 

360 PRINTi 961,R»5 

370 GOTO 370 


Im ersten Teil des Beispiels verwenden wir den normalen PRINT- 
Befehl. Es sind drei FOR...NEXT-Schleifen geschrieben. Die erste 
und die dritte Schleife zeichnen die oberen und unteren Rahmen¬ 
kanten, die zweite zieht beide Senkrechte, wobei die TAB-Funk- 
tion für die notwendigen Leerstellen sorgt. Gezeichnet wird der 
Rahmen mit dem Sternsymbol. Wichtig sind die Semikolons 
jeweils am Ende der PRINT-Befehle. 

In einen Rahmen kann man nicht mit dem einfachen PRINT- 
Befehl schreiben, sondern muß den Cursor vorher in die 
gewünschte Position bringen. Hier wird der PRINT@-Befehl ver¬ 
wendet, um A$ mittig zu schreiben. 

Wem der Aufbau eines Rahmens, wie eben beschrieben, zu lange 
dauert, der kann auch mit dem POKE-Befehl Grafikzeichen direkt 
in den Bildschirmspeicher setzen. Es müssen dann vier Schleifen, 
für jede Rahmenseite eine, geschrieben werden. 

Noch schneller wird der Rahmen gezeichnet, wenn man nur die 
Senkrechten mit POKE auf den Bildschirm bringt und für die Waa- 
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gerechten mit der entsprechenden Zahl von Zeichen eine Zeichen¬ 
kette bildet, die als obere und untere Begrenzung sehr schnell mit 
einem PRINT-Befehl ausgegeben werden kann. 

7.3 Möglichkeiten bei Vergleichen 

Formulierung von Vergleichsbedingungen 

Nicht ganz leicht verständlich sind manchmal die in IF...THEN- 
Befehlen stehenden Vergleichsbedingungen. Es gibt hier immer 
mehrere Möglichkeiten der Formulierung, die überdies computer¬ 
spezifisch voneinander abweichen können. Einige Beispiele werden 
im folgenden erklärt. In der gleichen Zeile stehen jeweils zwei For¬ 
mulierungen mit gleicher Wirkung. 

Bei allen BASIC-Dialekten wird 0 als Kennzahl erzeugt, wenn ein 
Vergleich als »falsch« erkannt wurde, während sowohl +1 als auch 
— 1 für »wahr« üblich sind (siehe auch Test 25—27 in Abschnitt 
4.7). Es gibt nun Funktionen, die nur zwei Zustände mit der Bereit¬ 
stellung von 0 oder —1 melden. So ist es z. B. bei vielen BASIC- 
Dialekten möglich, nur die Funktion ohne voll formulierte Ver¬ 
gleichsbedingung in den IF...TFIEN-Befehl zu schreiben. 


IF EüF(l) THEN.. IF EOF<1)= -1 THEN.. 


Verschachtelte Vergleiche, die in einigen Dialekten zulässig sind, 
können durch Verbindung mit dem AND-Operator ersetzt 
werden. 


IF A=2 IF B>0 THEN.. IF A=2 AND B>0 THEN.. 


Wenn auch mit den Vergleichskennzahlen gerechnet werden kann, 
findet man manchmal statt einer AND- oder OR-Verknüpfung die 
Bedingung wie links gezeigt formuliert. 


IF 

(A=2)+(B>0)= -2 

THEN.. 

IF 

II 

<r 

AND B>0 THEN.. 

IF 

(A=2) + (B>C»= -1 

THEN.. 

IF 

A=2 

ÜR B<0 THEN.. 


Um festzustellen, ob eine Zahl positiv oder negativ ist, kann man 
die SGN-Funktion verwenden. Das gleiche Ergebnis ist auch durch 
einen Vergleich mit 0 erzielbar. 


IF SGN(A) = 1 THEN.. IF A>0 THEN.. 
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Wenn bei als falsch erkanntem Vergleich 0 erzeugt wird, kann die 
AND-Verknüpfung durch das Multiplikationszeichen ersetzt wer¬ 
den, sofern die beiden Bedingungen davor und dahinter in Klam¬ 
mern stehen. 


IF (A=2)*(B>0) THEN.. IF A=2 AND B>0 THEN.. 


Soll geprüft werden, ob mehrere Variable den Wert 0 haben, kann 
dies mit dem AND-Operator, aber auch durch eine additive Ver¬ 
knüpfung erfolgen. Ähnliches gilt, wenn man ermitteln will, ob 
eine von mehreren Variablen den Wert 0 hat. In diesem Fall kann 
statt mit dem OR-Operator mit Multiplikationen verknüpft 
werden. 


IFA+B+C=0 THEN.. IF A=0 AND B=0 AND C=0 THEN.. 

IFA*B*C=0 THEN.. IF A=0 OR B=0 ÜR C=0 THEN.. 


Die Verwendung des NOT-Operators könnte etwas Verwirrung 
stiften, da jeder Vergleich damit umkehrbar ist. Man muß immer 
berücksichtigen, daß durch NOT das Bitmuster invertiert, d. h. 
daß aus Nullen Einsen und umgekehrt gemacht werden. 


IF NOT A > NOT B THEN-. IF A < B THEN.. 


Vergleich mit Joker 

Beim Suchen müssen bekanntlich das gesuchte und das eingegebene 
Wort genau übereinstimmen, wenn der Computer es mit einem 
Vergleichsbefehl finden soll. Es kommt aber immer wieder vor, daß 
man nicht genau weiß, wie ein gespeichertes Wort geschrieben 
wurde. Das folgende kleine Programm erlaubt darum die Einset¬ 
zung des Dollarzeichens als Joker in das Suchwort, an den Stellen, 
an denen die genaue Schreibweise nicht bekannt ist. 


10 REM Veraleich mit Joker JOKER 
50 INPUT"N«'’;N$ 

60 INPUT-NA* Mit Joker”;NA* 

100 FOR K = 1 TO LEN(NA*) 

110 IF MID*(NA*.K.1) <> "*" THEN 130 
120 N*=LEFT* (N*, K-1) -»-"*"+MID* (N*, K+1 > 
130 NEXT 

140 N*=LEFT*(N*,LEN(NA*>> 

150 PRINT ”NA*=";NA*."N*=";N* 
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Im Programm wird angenommen, daß N$ gespeichert wurde und 
NA$ eingegeben wird. In der Schleife wird jedes Zeichen von NA$ 
untersucht, ob es den Charakter eines Jokers hat. Ist dies der Fall, 
wird in die gleiche Stelle von N$ auch ein Joker gesetzt. Vor dem 
Vergleich, der hier nur in Zeile 150 durch die Ausgabe beider Zei¬ 
chenketten simuliert ist, wird der gespeicherte String noch auf die 
Länge des Eingabestrings beschnitten. 


7.4 Den Speicherraum 
besser ausnutzen 

Im allgemeinen werden zur Speicherung einer Ganzzahl 5 bis 
7 Byte und zur Speicherung einer Zeichenkette 6 bis 7 Byte zuzüg¬ 
lich einem Byte für jedes Zeichen benötigt (siehe auch die Abb. 8 
und 9 im Abschnitt 4.2, Seite 60 und 61). Sollen nur kleine Zahlen 
gespeichert werden, bedeutet dies eine gewisse Vergeudung von 
Speicherraum, die allerdings nur dann ins Gewicht fällt, wenn es 
viele Zahlen zu speichern gilt. 

Wir kennen darum eine ganze Anzahl von Methoden, benötigte 
Daten dichter gepackt zu speichern. Einige davon werden im fol¬ 
genden erklärt. 


Zahlen als Bitmuster speichern 

In einem Byte lassen sich 256 verschiedene Informationen unter¬ 
bringen. Wenn ausschließlich Zahlen bis zu dieser Grenze gespei¬ 
chert werden sollen, könnte man sie als Binärziffern ablegen, was 
aber nur in der Maschinensprache aussichtsreich ist. Es gibt jedoch 
die Möglichkeit, derartige Zahlen jeweils in einem Zeichen einer 
Zeichenkette zu speichern, wenn man den ASCII-Code dafür ver¬ 
wendet (der auch die Werte von 0 bis 255 annehmen kann). 


10 REM Soeicherplatz sparen SPEISPAR 

50 INPUT’*Wieviele Zahlen";M 

100 FÜR K = 1 TO M 

110 INPUT"2ahl 0...254";Z 

120 A*=CHR1i(Z) 

130 B$=B*+A$ 

140 NEXT 

200 FÜR K = 1 Tü M 
210 C»=MIDt(B*,K,1) 

220 PRINT ASC(C*); 

230 NEXT 
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In dem Programm läuft die Schleife so oft, wie einzelne Zahlen von 
0—254 gespeichert werden sollen (der eingesetzte Computer 
akzeptiert den Codewert 255 nicht mehr). In Zeile 120 wird die 
CHR$-Funktion verwendet, um aus der eingegebenen Zahl das 
dazugehörige ASCII-Zeichen zu erzeugen, das der String-Varia¬ 
blen A$ zugewiesen wird. In Zeile 130 wird dann der Gesamtstring 
B$ aus den einzelnen Zeichen zusammengesetzt. Zur Kontrolle, 
daß das Programm richtig arbeitet, wird in 210 B$ wieder aufgeteilt 
und anschließend der ASCII-Code jeder Zahl wieder ausgegeben. 

Drei Zahlen als eine Ganzzahl speichern 

Für die Speicherung einer Ganzzahl benötigen die meisten BASIC- 
Dialekte 16 Byte, die der Computer für den Zahlenbereich von 
—32 768 bis H-32 767 verwendet. Wenn statt dessen mehrere klei¬ 
nere Zahlen zusammen gespeichert werden sollen, kann man diese 
auch in einer Integer-Variablen unterbringen. 


10 REM 3 Zahlen in einem Inteqer DREIZASP 

20 DEFINT A,S,T,W 

100 INPUT"Woche <1-52>";W 

110 IF W > 52 THEN 100 

120 INPUT"Tag <1-7>";T 

130 IF T > 7 THEN 120 

140 INPUT"Stunden <1-12>";S 

150 IF S > 12 THEN 140 

200 A = W*2A7 4- T*2A4 + S 

201 PRINT A 

300 WO = A/128: TA = (A-Wü»128)/16 

310 ST = (A-WD*128-TA*1Ä) 

311 PRINT WO,TA,ST 


Das Beispiel geht von der Annahme aus, daß die Wochenzahl 
(1—52), der Wochentag (1—7) und eine Kennziffer für die Stunde 
(1 — 12) zu speichern sind. Für die Woche werden 7 Bit, für den Tag 
4 Bit und für die Stunde 4 Bit verwendet. Das sind insgesamt 15 Bit, 
so daß das höchstwertige Bit, das meist als Vorzeichenbit in der im 
Computer verwendeten 2er-Komplementmathematik dient, nicht 
gebraucht wird. 

Alle im Programm verwendeten Variablen werden zu Beginn als 
Integer-Variable definiert. Nach den Eingabebefehlen und der Ein¬ 
gabeprüfung wird in Zeile 200 die zu speichernde Ganzzahl A aus 
den drei Teilzahlen zusammengesetzt. Hierzu muß die Woche mit 
2 ! multipliziert werden, weil die Wochenzahl ab dem Bit Nr. 7 
gespeichert wird. Ebenso ist die Tageszahl mit 2^ malzunehmen, da 
hier die Speicherung mit dem Bit Nr. 4 beginnt. Für die Speiche- 
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rung der Stundenzahl werden die Bits Nr. 0 bis 3 benutzt, für die 
kein Multiplikationsfaktor notwendig ist. 

Die letzten Befehle zeigen die Rückwandlung vom Integer in die 
drei einzelnen Zahlen. Die Wochenzahl entsteht bei Division durch 
128, den Wert von 2!. Verwendet wird nur der ganzzahlige Anteil, 
da durch die Definierung auch WO zur Integer-Variablen erklärt 
wurde. Um den Tag zu ermitteln, muß der zur Darstellung der 
Wochenzahl verwendete Teil der Ganzzahl A von dieser abgezo¬ 
gen und der Rest durch 2"*, also durch 16, geteilt werden. Die 
Stundenzahl ergibt sich dann auf gleiche Weise durch Subtraktion 
der schon verwendeten Teile der Ganzzahl. 

Gepackte String-Speicherung 

Bei einigen Typen wahlfrei lesbarer Dateien muß man die Länge 
jedes Datenfeldes vorher festlegen. Wenn man nun stets von der 
möglichen Maximallänge jeder in ein Feld zu setzenden Eintragung 
ausgeht, führt dies zu Platzverschwendung: Es kommt wohl nie 
vor, daß bei allen Eintragungen die Maximallänge benötigt wird. 
Faßt man dagegen mehrere Einzeleintragungen in einem Datenfeld 
zusammen, kann dieses kürzer definiert werden, da sich lange und 
kurze Eintragungen ausgleichen. 


10 REM Gepackte Speicheruna PACKSPEI 
70 N$="Maier" 

80 V$="Hans-Helmut'* 

90 □$="Ni eder kutzenhausen-Großdor-f " 
100 "+ 0 $ 

200 Z=l: GOSUB 1000 

210 N*=LEFT$(X$,K-1>: PRINT Nt 

220 Z=K+1: GOSUB 1000 

230 Vt=MIDt<Xt,Z,K-Z): PRINT Vt 

240 Z=K+1: GOSUB 1000 

250 Ot=MIDt(Xt,Z): PRINT Ot 

990 END 

1000 FOR K = Z TO LEN(Xt) 

lOlO IF MIDt(Xt,K.1)="," THEN RETURN 

1020 NEXT: RETURN 


Im Beispiel wird der Name, der Vorname und der Ort zusammen¬ 
gefaßt, indem in Zeile 100 der Gesamtstring X$ aus den Teilstrings 
unter Zwischenschaltung von Kommas gebildet wird. Zur Auftei¬ 
lung von X$ in die Teilstrings wird ein Unterprogramm verwendet. 
Dort steht eine FOR...NEXT-Schleife, in der der Anfangswert der 
Laufvariablen Z jeweils aus dem Hauptprogramm entnommen 
wird. In der Schleife werden die einzelnen Zeichen von X$ unter¬ 
sucht, und wenn dort ein Komma gefunden wird, erfolgt der Rück¬ 
sprung zum Hauptprogramm. Dort geschieht dann mit Hilfe von 
LEFT$ bzw. von MID$ die Ausgabe der einzelnen Teilstrings. 
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7.5 Direkter Speicherzugriff 

Dezimalzahl in 2-Byte-Binärzahl wandeln 

Da einerseits in BASIC alle Zahlenein- und -ausgaben in dezimaler 
Form erfolgen, andererseits aber alle Zahlen im Binärformat abge¬ 
speichert werden, sind immer Umrechnungen notwendig, wenn die 
Binärzahl mehr als ein Byte benötigt. Bei den am meisten verwen¬ 
deten Mikroprozessormodellen der Z 80-, 80xx- und 65xx-Serien 
werden 2-Byte-lange Binärzahlen grundsätzlich in der Weise 
gespeichert, daß das niederstwertige Byte in der niedrigsten 
Adresse und das höchstwertige Byte in der nächsthöheren Adresse 
gespeichert werden (Abb. 15). 


Adresse (dez) 


Bitmuster 


A A + 1 

162A0 162A1 




1 1 1 0 1 0 1 0 1 0 1 1 1 1 1 0 

0 1 0 1 0 1 1 1 0 1 0 1 1 1 1 1 




Dezimolwert 
der Byte 


Dezimolwert 
der 2-Byte-ZQhl B 



Abb. 15: Speicherung von Ganzzahlen in 2 Byte 

Bei den in Personal-Computern vielfach verwendeten Microprozes- 
soren der Typen 8085, Z 80 und 65xx wird das höherwertige Byte der 
Binärzahl auch in der höheren Adresse gespeichert. Bei der Umrech¬ 
nung in eine Dezimalzahl müssen darum die Bytes gekreuzt werden 

Wenn also z. B. eine Zeilennummer oder eine Adresse mit PEEK 
aus dem Speicher gelesen beziehungsweise mit POKE in den Spei¬ 
cher geschrieben werden sollen, müssen die Befehle wie folgt for¬ 
muliert werden (hier bedeutet A die erste Speicheradresse und B die 
Dezimalzahl im Bereich von 0 bis 65 535): 


100 PEEK(A) + 256 * PEEK<A+1) 

200 POKE A.B-256 * INT(B/256) 
210 POKE A+1,INT(B/256) 


169 






Zeilennummer in Komplementärdarstellung 

Einige Computer speichern Adressen oder Zeilennummern über 
32 767 als Negativzahlen. In diesem Fall kann die Umrechnung mit 
dem folgenden Befehl erfolgen: 

100 A = A 65536 ♦ (A > 32767) 

Wenn die als Variable A eingegebene Zahl größer als 32 767 ist, ist 
der Vergleich in der Klammer wahr, und es wird dort bei dem 
verwendeten Computer —1 erzeugt. Die neue Zahl wird dann 
durch Subtraktion von 65 336 gebildet. Ist der Vergleich in der 
Klammer falsch, wird dort 0 erzeugt, und der Ausdruck reduziert 
sich zu A = A. Die Adresse ändert sich also nicht. 

Ändern einzelner Bit im Speicher 

Bei einigen BASIC-Dialekten ist es notwendig, für gewisse Aufga¬ 
ben einzelne Bit im Speicher zu ändern. Hierfür können OR- und 
AND-Verknüpfungen benutzt werden. Abb. 16 zeigt die Ände¬ 
rung der Bitmuster bei folgenden Befehlen: 


100 POKE A,B ÜR PEEK(A) 

200 POKE A,NÜT B AND PEEK(A) 


7 6 5 4 3 2 1 0 

U8 I I I 0 I0 I I I 0 I I I 0 I 0 I 


8 I 0 I 0 I 0 I 0 I I I 0 I 0 I 0 I 


Bitnummer 

Ausgongsmuster in Adr. A 


Maske mit 1 in Bit Nr. 3 (Bl 


156 I I I 0 I 0 I I I I I I I 0 I O] Ergebnis 

Bit Nr 3 auf 1 setzen 


156 I I I 0 I 0 I I I I I I I 0 I 0 
AND 

2A7 I I I I I I I I I 0 I I I I I I 


Ausgongsmuster in Adr A 


Maske mit 0 in Bit Nr. 3 (NOT B) 


U8 I l|o|o| l|o| ||q|o| Ergebnis 

Bit Nr 3 löschen 


Abb. 16: Änderung einzelner Bit im Speicher 

Unterschiedliche Masken, wenn eine OR-Verknüpfung für das Set¬ 
zen und eine AND-Verknüpfung für das Löschen verwendet wird 
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Es ist zu erkennen, daß innerhalb des POKE-Befehls der alte Inhalt 
der Adresse mit PEEK gelesen und dann logisch mit dem Bitmuster 
verknüpft wird, in dem nur das oder die zu setzenden oder zu 
löschenden Bits gesetzt sind. 

Manchmal wird auch eine etwas andere Methode angewendet. 


K)0 PGH.E A, (PEEK(A) AND M) + B 



7 6 

5 4 3 2 1 0 

Bitnummer 

U8 

1 1 0 

1 0 1 1 1 0 1 1 1 0 1 0 1 

AND 

Ausgongsmuster in Adr. A 

21.7 


1111 hh 11111 

+ 

Maske mit 0 in Bit Nr. 3 1 NOT B) 

e 

01 

1 0 1 0 1 1 1 0 1 0 1 0 1 

Nur Bit Nr. 3 gesetzt 

156 

01 

1 0 1 1 1 1 1 1 1 0 1 0 1 

Bit Nr. 3 Quf 1 setzen 

Ergebnis 

156 

01 

1 0 1 1 1 1 1 1 1 0 1 0 1 

ÄND 

Ausgongsmuster in Adr. A 


01 

M1 1 |o| 1 1 1 1 1 1 

Maske mit 0 in Bit Nr.3 |NOT Bl 

M 

00 

1 0 1 1 1 0 1 1 1 0 1 0 1 

Bit Nr. 3 löschen 

Ergebnis 


Abb. 17: Andere Methode zum Ändern einzelner Bit im Speicher 

Wenn eine Maske verwendet wird, in der nur das zu bearbeitende Bit 
auf 1 gesetzt ist, kann es damit gelöscht werden. Das Setzen erfolgt 
dann durch Addition 

Hier erfolgt die AND-Verknüpfung in jedem Fall durch Bitmuster 
mit einer Maske, in der alle nicht zu ändernden Bit gesetzt sind. 
Nur die zu bearbeitenden Bit enthalten eine 0. Die Maske kann 
auch durch NOT B erzeugt werden. Hiermit werden die zu bear¬ 
beitenden Bit gelöscht. Sollen sie gesetzt werden, erfolgt eine Addi¬ 
tion mit dem Bitmuster, das nur diese Bit als Einsen enthält. 

In der Literatur werden auch folgende Formulierungen empfohlen: 

Setzen POKE adr ,PEEK(adr) OR 2 a bitnummer 
Löschen POKE adr ,PEEK(adr) AND 255—2 a bitnummer. 
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7.6 Verschiedenes 

Anfertigung einer Hardcopy 

Diverse BASIC-Dialekte gestatten es, durch einfache Tastenbetäti¬ 
gung auf dem Drucker eine Kopie des Bildschirms anzufertigen. 
Wenn die verwendete BASIC-Version die VARPTR-Funktion 
kennt, gibt es eine interessante Routine, die das gleiche bewirkt. 

Die VARPTR-Funktion liefert die Adresse des 4. Byte des Varia¬ 
blenspeichers, das hier die Länge der gespeicherten Zeichenkette 
enthält. Das folgende kleine Demonstrationsprogramm zeigt 
zunächst die Arbeitsweise. Nacheinander werden die Kennung für 
den Variablentyp, das 2. und das 1. Zeichen des Namens, die Länge 
und das untere und obere Byte des Zeigers auf den Zeichenspeicher 
ausgegeben. 


v$=» " 
READY 
>PRINT 

VARPTR<V«) 


27211 

READY 

>FOR K= 

= -3 TG 2: PRINT PEEK(27211+K):: 

NEXT 

3 0 

86 0 234 255 


READY 

> 




Bei dem verwendeten Computer beginnt der Bildschirmspeicher in 
der Adresse 15 360. Je Zeile werden 64 Zeichen dargestellt, so daß 
die letzte (16.) Zeile in 16 320 beginnt. Damit der Speicher einge¬ 
richtet wird, enthält Zeile 1000 eine Leerzuweisung. Im 5. und 
6. Byte steht die Adresse im Zeichenspeicher, von der ab die Zei¬ 
chen beim Aufruf der betreffenden Zeichenkettenvariablen vom 
Computer zu holen sind. 

Im Programm wird nun zunächst in Zeile 1020 der Wert 64 in das 
4. Byte (das sonst die Zeichenkettenlänge enthält) geschrieben. 
Dann werden in einer Schleife jeweils die Zeichenspeicheradressen 
durch die Anfangsadressen einer Bildschirmzeile ersetzt, wodurch 
V$ jeweils den Inhalt einer Bildschirmzeile enthält und ausge¬ 
druckt werden kann. 


10 REM HARDCOPY GENIE I 

HARDCOPY 

1000 

V$=" " 


1010 

V=VARPTR(V$) 


1020 

PÜKE V,64 


1030 

FÜR K=15360 TO 16320 

STEP 64 

1040 

POKE V+1,K AND 255 


1050 

POKE V+2,INT(K/256) 


1060 

LPRINT 


1070 

NEXT 
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Zufallszahlen eines Bereichs mit RND 

Eine Reihe von BASIC-Dialekten erlaubt die einfache Erzeugung 
ganzzahliger Zufallszahlen im Bereich von 1 bis zu einer als Argu¬ 
ment in die RND-Funktion einzusetzenden Zahl. Wenn diese 
Möglichkeit nicht gegeben ist und nur Zufallszahlen zwischen 0 
und 1 erzeugt werden können, hilft folgende Anweisung, die 
Ganzzahlen im Bereich von 1 bis Z erzeugt: 


100 PRINT INT(Z*RND(0) )-»-l 


Sollen die Zufallszahlen in einem bestimmten Bereich liegen mit K 
als kleinster und G als größter Zahl, kann wie folgt programmiert 
werden: 


100 PRINT INT((G-K+1)$RND(0>)+K: 


Hexadezimal-Dezimal-Wandlung 

Es gibt eine ganze Reihe von Methoden, Zahlen eines Systems in 
ein anderes zu wandeln. Das hier gezeigte Programm verwendet für 
die Hex-Dez-Wandlung die Reihenfolge der Zeichen im ASCII- 
Code. 


10 REM Hex-Dez-Wandluna HEXDEZWA 
90 INPUT**Hex-Zahl "jH* 

100 L=LEN(H»): D=0 
110 FÜR K = 1 Tü L 
120 A=ASC(MID$(H$,K,1))-48 
130 IF A>16 THEN A-=A-7 
140 D=D+A*16Ä(L-K) 

150 NEXT 
160 PRINT D 


In einer Schleife wird vom ASCII-Wert jeder Hex-Stelle 48 subtra¬ 
hiert und das Ergebnis der Hilfsvariablen A zugewiesen. Bei den 
Hex-Ziffern 0 bis 9 nimmt A auch den Wert 0 bis 9 an. Danach 
wird A dahingehend geprüft, ob es, größer als 16 ist, denn dann 
muß es sich um eines der Buchstabensymbole A bis F handeln. In 
diesem Fall wird 7 subtrahiert, so daß A schließlich den Dezimal¬ 
wert des Buchstabensymbols enthält. In Zeile 140 erfolgt in übli¬ 
cher Weise die Zusammensetzung der Dezimalzahl aus den Dezi¬ 
malwerten der einzelnen Stelle, multipliziert mit den Potenzen von 
2. Zum Verständnis dieses Programms sollte die ASCII-Tabelle in 
Abb. 10 auf Seite 77 herangezogen werden. 
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8. Fremde Programme ver¬ 
stehen und konvertieren 


Alle Programmiersprachen bieten viele Möglichkeiten, Aufgaben 
auf unterschiedliche Weise zu lösen. BASIC bildet hier keine Aus¬ 
nahme. Die Vielfalt der Gestaltungsmöglichkeiten wiederum 
bedeutet, daß fremde Programme nicht immer so ohne weiteres zu 
verstehen sind. 

Im folgenden sollen einige Hinweise gegeben werden, wie man 
Vorgehen kann, um fremde Programme zu durchschauen. Denn 
Voraussetzung für das Umstellen eines Programms ist es, daß 
Ablauf und Sinn der Befehle des Ursprungsprogramms begriffen 
sind. 

Bei der Umstellung, also der Konvertierung eines Programms für 
den eigenen Computer, kann es zusätzliche Schwierigkeiten geben. 
Wir wollen deshalb erklären, wann es besser ist, ein Programm neu 
zu schreiben, statt es zu konvertieren. 


8.1 Grobanalyse fremder Programme 

Wer an einem fremden Programm interessiert ist, sollte dieses 
zunächst eingehend untersuchen, ehe er daran geht, es über die 
Tastatur in seinen Computer einzugeben. Selbst wenn das Pro¬ 
gramm auf dem gleichen Computer geschrieben wurde, lohnt sich 
eine vorherige Grobanalyse, bei der die folgenden Punkte unter¬ 
sucht werden sollten. 


Aufgabe und Ergebnis des Programms 

Es hat wenig Sinn, sich mit einem Programm zu beschäftigen, das 
nicht auch für den eigenen Bedarf nützlich ist. Als erstes sollte man 
darum prüfen, was das Programm bewirken soll und welches 
Ergebnis es liefern wird. 
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Während der Programmzweck meist aus der Überschrift zu erse¬ 
hen ist, kann man leider nicht so ohne weiteres erkennen, welche 
Resultate ein Programm vorlegen wird. Nur selten findet man mit 
der Programmliste zusammen auch Ausdrucke des Programmlaufs 
mitveröffentlicht. Vielleicht liegt dies daran, daß die Erstellung 
einer Hardcopy, also eines Ausdrucks der Bildschirmausgabe, bei 
vielen Computern schwierig zu programmieren ist. 

Oft kann man aber im Programm selbst an den PRINT-Befehlen 
erkennen, was als Ergebnis eines Programmlaufs ausgegeben wird. 
In jedem Fall läßt sich schnell herauslesen, ob das Programm zum 
Lauf einen Drucker benötigt und mit welcher Speicherung gearbei¬ 
tet wird. 

Wenig Sinn hat es, sich mit einem Programm zu befassen, dessen 
Grundproblem man nicht beherrscht. Wenn man die in einem Pro¬ 
gramm verwendeten mathematischen Rechenverfahren nicht 
beherrscht, versteht man es nicht. Das gleiche gilt für Spielpro¬ 
gramme. Man wird sie nur begreifen, wenn die Spielregeln bekannt 
sind oder im Programm erklärt werden. 


Verwendete BASIC-Version 

Nicht immer gibt der Begleittext eines Programms an, welcher 
BASIC-Dialekt verwendet wurde, beziehungsweise auf welchem 
Computer es entwickelt wurde. Da dies aber für das weitere Vorge¬ 
hen wichtig ist, sollte man nach typischen Zeichen suchen, die auf 
einen bestimmten Computertyp schließen lassen. 

Atari-Programme kann man oft daran erkennen, daß das als Kür¬ 
zel statt des PRINT-Befehls eingegebene Fragezeichen im Listing 
stehenbleibt und nicht, wie sonst üblich, übersetzt wird. Auch das 
Befehlswort POSITION ist typisch für diesen Computer. 

Typisch für Apple-Programme ist die Verwendung der Befehls¬ 
wörter REVERSE, NORMAL, VTAB und HTAB. Nach GET 
folgt kein IF...THEN-Befehl, da der Computer wartet. 

Commodore-Programme zeigen oft innerhalb von Zeichenketten 
den negativen Ausdruck gewisser Steuerzeichen. Desgleichen kann 
auch die häufige Verwendung der CHR$-Funktion für diesen 
Computer kennzeichnend sein. 

In Fi-P-BASIC geschriebene Programme sind leicht an den sonst 
nicht üblichen Befehlswörtern wie DISP, SHORT, INTEGER, 
REAL, CURSOR, IMAGE usw. zu erkennen. 
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Programme, die auf dem Genie oder dem TRS 80 entwickelt 
wurden, haben fast immer den CLEAR-Befehl am Anfang zur 
Reservierung von Speicherplatz für Zeichenketten. Man findet 
auch manchmal den sonst nicht üblichen PRINT@-Befehl. 

Ebenfalls nicht zu verwechseln sind SINCLAIR-Programme. Sie 
enthalten oft den Befehl PRINT AT und nach Funktionen das 
Argument immer ohne Klammern. LET ist stets ausgeschrieben. 

Fast gleichlautend sind die Programme, die in neuen Microsoft- 
BASIC-Versionen geschrieben wurden, wie sie z. B. auf dem IBM- 
PC, dem CASIO, dem EPSON und vielen anderen Computern 
laufen. 

8.2 Umstellen oder neu schreiben? 

Manchmal dürfte es einfacher sein, eine vorliegende Programmauf¬ 
gabe durch ein selbst entwickeltes Programm zu lösen, als ein frem¬ 
des Programm so umzustellen, daß es auf dem eigenen Computer 
läuft. Insbesondere können umständlich oder unstrukturiert 
geschriebene Programme auch durch Konvertierung nicht verbes¬ 
sert werden. 

Spaghettiprogramme 

Wenn ein Programm durch zu viele Sprungbefehle so unübersicht¬ 
lich erscheint, daß keine klaren Module zu erkennen sind, sollte 
man nicht unnötige Mühe in die Entzifferung stecken. Vielfach 
sind bei derartigen Programmen »Rucksäcke« programmiert, 
worunter man durch Sprungbefehle angehängte Befehlsfolgen ver¬ 
steht, die ursprünglich vergessen wurden. 

POKE- und PEEK-Programme 

Bei einigen Computern sind POKE-Befehle für den Aufruf gewis¬ 
ser Programmfunktionen nicht zu vermeiden. Wer sich mit dem 
betreffenden Computer beschäftigt hat, kann diese auch richtig 
interpretieren. Wenn aber die Verwendung von POKE und PEEK 
in einem Programm zu häufig geschieht, ist das für Außenstehende 
kaum noch nachvollziehbar. 

Programme mit Maschinenroutinen 

Programme, in denen in Maschinensprache geschriebene Routinen 
verwendet oder angerufen werden, sind nur verständlich, wenn die 
Wirkung dieser Routinen bekannt ist. Wer kein Experte ist, sollte 
nicht versuchen, derartige Programme zu analysieren und zu ver¬ 
stehen. 
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Generierte Programme 

Es gibt heute bestimmte unter dem Namen Programmgenerator 
oder ähnlich angebotene Hilfsprogramme, mit denen man ohne 
Beherrschung einer Programmiersprache individuelle BASIC-Pro- 
gramme erstellen kann. Die so entstandenen Programme sind nur 
schwer zu analysieren und kaum auf einen anderen Computertyp 
umstellbar. 

Grafikprogramme 

Obwohl die Befehlswörter bei den Grafikbefehlen oft gleich lau¬ 
ten, kann die Wirkung in den einzelnen Dialekten recht unter¬ 
schiedlich ausfallen. Die Umstellung eines Programms mit vielen 
derartigen Befehlen ist darum sehr mühsam und kaum sinnvoll. 

Programme mit Datenspeicherung 

Erhebliche Schwierigkeiten bei der Umstellung dürften sich erge¬ 
ben, wenn das fremde Programm mit Datenspeicherung auf Dis¬ 
ketten arbeitet und einem selbst nur ein Kassettenrecorder zur Ver¬ 
fügung steht. Eine Umstellung ist nicht möglich, wenn im Disket¬ 
tenbetrieb Daten mitten im Programm gelesen werden. Nur wenn 
das Einlesen aller Daten am Anfang erfolgt und während des Laufs 
lediglich mit dem Speicherinhalt gearbeitet wird, kann eine Umstel¬ 
lung in Betracht gezogen werden. 

Programme der gleichen BASIC-Familie 

Verhältnismäßig leicht umstellbar sind Programme, die nur in einer 
abweichenden Version eines auch auf dem eigenen Computer lau¬ 
fenden Dialekts geschrieben sind. So unterscheiden sich die auf 
verschiedenen Commodore-Computern laufenden BASIC-Dia- 
lekte nur geringfügig, z. B. bei den Adressen des Bildschirmspei¬ 
chers. Das gleiche gilt für die verschiedenen Versionen des Micro- 
soft-BASIC, die auch nur minimale Abweichungen aufweisen. 

Microsoft-BASIC und andere Dialekte 

Da POKE-Befehle bei Programmen, die in Microsoft-BASIC 
geschrieben wurden, eigentlich nicht notwendig sind, lassen sich 
Microsoft-BASIC-Listings gut in andere Dialekte umschreiben. 
Auf der anderen Seite sind Programme, die auf Computern mit 
häufigem Zugriff auf die Maschinensprache (z. B. Acorn, Atari, 
Commodore u. a.) entwickelt wurden, nur schwer konvertierbar. 
Wenn aber abweichende Befehlswörter mit im wesentlichen glei¬ 
cher Befehlswirkung im fremden Programm Vorkommen, ist die 
Umstellung möglich. 
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8.3 Fremde Programme untersuchen 

Wer sich mit fremden Programmen befaßt, sei es, um daraus zu 
lernen, sei es, um sie in abgewandelter Form auf seinem Computer 
zum Laufen zu bringen, muß diese verstehen. Hierfür ist eine ein¬ 
gehende Untersuchung des Programmaufbaus und des Programm¬ 
ablaufs erforderlich, für die im folgenden einige Hinweise gegeben 
werden. 


Aufgliederung in Programm-Module 

Ein vernünftig geschriebenes Programm muß strukturiert sein, das 
heißt, es muß aus in sich abgeschlossenen Modulen bestehen, die 
nur einen Eingang und (möglichst) auch nur einen Ausgang haben 
sollten. Es gibt Programm-Autoren, die die einzelnen Programm¬ 
teile durch Kommentar- oder Leerzeilen optisch gut voneinander 
trennen. 

Bei anderen Programmen ist die Gliederung nicht immer so deut¬ 
lich zu erkennen. Dies braucht nicht zu bedeuten, daß der Verfas¬ 
ser des Programms nichts von der Strukturierung hält. Eine deutli¬ 
che Abgrenzung der Strukturblöcke wird zum Beispiel dadurch 
vorgenommen, daß diese immer in geraden Hunderter- oder Tau¬ 
sender-Zeilennummern beginnen. 

Der erste Schritt einer Programmanalyse besteht also darin, den 
Aufbau des Programms zu erforschen und gegebenenfalls den 
Beginn und das Ende einzelner Programm-Module herauszuarbei¬ 
ten. Hierbei kann man wie folgt Vorgehen: 

- Durch waagerechte Striche wird jeweils der Anfang und das 
Ende eines Moduls markiert, wenn nicht schon eine Markierung 
im Programm steht. 

- Sehr zweckmäßig ist es, alle FOR...NEXT-Schleifen optisch zu 
kennzeichnen und dabei auch auf Schleifenverschachtelungen zu 
achten. 

- Durch Unterstreichen markiert man alle in GOTO und GOSUB 
stehenden Zeilennummern. 

- Hierbei erkennt man, wo Unterprogramme anfangen. Sie wer¬ 
den am Rand in ganzer Länge bis zum RETURN-Befehl mit 
zwei senkrechten Strichen gekennzeichnet. 

- Wichtig ist aber auch die klare Kennzeichnung aller Zeilen, die 
Ziel eines Sprungbefehls sind. Hierfür kann beispielsweise ein 
kleiner Pfeil verwendet werden. 

Abb. 18 zeigt ein nach diesem Verfahren markiertes Programm. 
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10 REM Stichwörter einsortieren STICHW02 
40 CLEAR 10000 
50 DIM X*(500).H(500) 

^ 60 INPUT"Altes Verzeichnis einiesen <J/N>";Y$ 
70 IF OR Y$=”J" THEN 100 

80 IF Y«="n" OR Y*=*'N'' THEN 200 
90 GO~G 70 _ 

- 100 OPEN*'!".#!. "DADIDA" 

110 INPUT#l.Z 

t l20 FOR K = O TO Z 
130 INPUT#1.X$(K>,H(K> 

140 NEXT 

150 CLOSE_ 

^ 200 PRINT"Stichwörter eingeben, mit O beenden" 
- 210 INPUT X$ 

220 IF X^ ="0" THEN 400 

230 Z = Z + 1 

240 = LEFT$(X*,1) 

250 IF ASC(B$) >= 97 THEN 290 
270 X = ASC(B$) + 32 

280 X$ = CHR1KX) + RIGHT»(X$,LEN(X*)-1) 

- 290 X$(Z)=X»; H(Z>=Z 

•300 FOR K = Z TO 1 STEP -1 

310 IF X»(H(K)> > X»(H(K-1>) THEN 210 

320 Y=H(K):H(K)=H<K-1):H(K-1)=Y 

•330 NEXT K 

340 GOTO 210 __ 

- 400 OPEN"O".#1,"DADIDA" 

410 PRINT#l.Z 

E '20 FOR K = O TO Z 

30 PRINT#1.X$<K):".“:H(K) 

40 NEXT 

450 CLOSE _ . 

500 FOR K = O TO Z 
510 PRINT X»(H(K)>. 

520 NEXT 


Abb. 18: Programm »Stichwörter einsortieren« mit Markierung 


Erkennen des Programmablaufs 

Wenn das Programm so weit markiert ist, sollte man versuchen zu 
erkennen, wie das Programm abläuft. Hierbei ist zunächst zu 
ergründen, auf welche Weise und in welcher Reihenfolge die Pro- 
gramm-Module miteinander verknüpft sind. 

Am besten läßt sich dies in einem groben Flußdiagrammy das auch 
Programm-Ahlaufplan genannt wird, darstellen. Sprünge, die zu 
Schleifen innerhalb eines Moduls gehören, durch die also keine 
Änderung des Programmlaufs erfolgt, brauchen hierbei nicht 
berücksichtigt zu werden. Es sind aber alle Aussprünge aus einem 
Modul zu erfassen. 

Nur bei kleinen Programmen ist es möglich, den Programmlauf 
durch Pfeile in der Programmliste zu markieren. Wem das Zeich¬ 
nen eines Flußdiagramms zu mühsam ist, der kann sich manchmal 
mit einer Zeilen-Ablaufliste, auf der die Zeilennummern aller 
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Sprungbefehle und aller Sprungziele stehen, begnügen. Eine derar¬ 
tige Liste mag auch bei größeren Programmen dazu dienen, einen 
ersten Überblick über den Programmlauf zu bekommen. Abb. 19 
zeigt, wie der Programmablauf des Programms in Abb. 18 als Zei- 
len-Ablaufliste dargestellt werden kann. 
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Unbedingte Sprünge 


Bedingte Sprünge 


Abb. 19: Zeilenablaufliste für das Programm in Abb. 18 

Bei dieser Darstellung werden nur die Zeilennummern aufgeführt, 
die einen Sprungbefehl oder ein Sprungziel enthalten. Abgeschlos¬ 
sene Schleifen brauchen nicht genau bezeichnet zu werden 


Besondere Aufmerksamkeit muß man hierbei den Unterprogram¬ 
men widmen. Viele Programmierer verwenden GOSUB-Befehle, 
wenn auch einfache GOTO-Befehle gereicht hätten. Letztere 
genügen immer dann, wenn das Programm nach jedem Anruf an 
der gleichen Stelle weitergehen soll. Bei der Analyse von Program¬ 
men mit vielen GOSUB-Befehlen besteht die Schwierigkeit, daß 
man übersieht, wo das Programm nach dem Unterprogramm fort¬ 
gesetzt wird. Die Rückkehrstellen nach Unterprogramm-Aufrufen 
müssen also auch klar aus dem Ablaufplan ersichtlich sein. 
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Wer ein Programm so weit analysiert hat, wird oft schon recht gut 
erkennen, was in dem Programm geschieht. Wenn die im Pro¬ 
gramm verwendeten Befehle auch auf dem eigenen Computer lau¬ 
fen, kann man eintippen. Gegebenenfalls ändere man einzelne 
Befehle. Will man das Programm darüber hinaus bis zur letzten 
Befehlsfolge verstehen, muß man meist noch mehr Mühe auf¬ 
wenden. 


8.4 Analyse einzelner Befehlsfolgen 

Ist der Ablauf eines Programms herausgearbeitet, so bedeutet dies 
längst nicht immer, daß auch alle Befehle begriffen sind. Hier tut 
oft noch eine detaillierte Analyse not, bei der man logisch vorgehen 
und gegebenenfalls den Computer als Hilfe benutzen muß. 


Aufstellung der Variablenliste 

Wenn im Programm selbst oder in der Beschreibung keine Varia¬ 
blenliste zu finden ist, muß als erstes diese angelegt werden. Die 
Zusammenstellung einer solchen Liste kann etwas Detektivarbeit 
erfordern. Am besten fängt man damit an, die Variablennamen 
aufzuschreiben, die in INPUT- oder GET-Befehlen Vorkommen; 
denn diese werden meistens im Befehl selbst oder in einem PRINT- 
Befehl davor erklärt. 

Auch die Ausgabe-Befehle können bei der Aufstellung der Varia¬ 
blenliste hilfreich sein, da im Programm für den Anwender meist 
erklärt wird, was Ausgaben bedeuten. Erfolgt die Ausgabe in 
Tabellenform, muß man die Kopfzeile der Tabelle betrachten. 

Schwieriger ist es, die Bedeutung der Variablen zu ermitteln, die im 
Programmlauf als Zwischenspeicher usw. gebraucht werden. Man 
sollte sie anfangs darum nur mit ihrem Namen in die Liste aufneh¬ 
men und die Bedeutung erst nachtragen, wenn man die Befehle, in 
denen sie Vorkommen, im einzelnen untersucht hat. 

Bei der Variablenliste gilt es auch daran zu denken, daß eine Varia¬ 
ble im Programm durchaus verschiedene Bedeutungen haben kann. 
Viele Programmierer verwenden bewußt einen schon vorher 
benutzten Variablennamen, sofern die alte Bedeutung im Pro¬ 
gramm nicht mehr gebraucht wird. Man erinnere sich hier nur 
daran, daß für neue FOR...NEXT-Schleifen immer wieder die glei¬ 
che Variable als Laufvariable verwendet werden kann, wenn die 
Schleifen, in denen sie vorher gebraucht wurde, abgeschlossen sind. 
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Vor Aufstellung der Variablenliste untersucht man am besten, ob es 
am Anfang des Programms oder an anderer Stelle Definitionsbe¬ 
fehle gibt, die bestimmte Namen an bestimmte Variablentypen bin¬ 
den. Bei einigen BASIC-Dialekten ist das erlaubt. 

Besonders zu untersuchen sind Feldvariable, bei denen man her¬ 
ausfinden muß, welche Bedeutung die Feldinhalte wie auch die 
Indices haben. 

Nicht sofort verständliche Befehlsfolgen 

Wenn man so weit gekommen ist, wird der Aufbau der meisten 
Programmzeilen einigermaßen verständlich sein, aber oft wird man 
auch auf Befehlsfolgen stoßen, deren Sinn nicht sofort einleuchtet. 

Schwierigkeiten kann es geben, wenn die CHRS-Funktion einbe¬ 
zogen ist. Falls das verwendete BASIC den Standard-ASCII-Code 
benutzt, hilft ein Blick auf eine ASCII-Tabelle. Leider gibt es aber 
auch Dialekte, die einen eigenen Code heranziehen. Da dieser aber 
fast immer, zumindest in der Reihenfolge der Zeichen, an den 
ASCII-Code angelehnt ist, hilft dann auch einiges Nachdenken. 
Vielfach werden Cursorbewegungen mit PRINT CHR$(...) er¬ 
zeugt. 

Über POKE-Befehle wurde schon einiges gesagt. Oft dienen sie 
nur zur Bildschirmsteuerung, z. B. zum Einschalten der negativen 
Darstellung oder zur Wahl einer besonderen Betriebsart. Man ver¬ 
sucht dann, ob das Programm auch ohne diese Befehle läuft. 

Schwer verständlich können ungewöhnliche Vergleichformulierun- 
gen sein, über die einiges im Abschnitt 7.3 gesagt wurde. Insbeson¬ 
dere ist die Wirkung des NOT-Operators manchmal nicht auf den 
ersten Blick zu erkennen. Es ist darum empfehlenswert, unklare 
Vergleiche einfach im Direktbetrieb auf dem Computer auszupro¬ 
bieren. 

Auch die von manchen Programm-Autoren sehr gern verwendeten 
Funktionsdefinitionen mit DEF FN sind hin und wieder nicht 
sofort zu durchschauen, da sich die Syntaxregeln bei den einzelnen 
Dialekten unterscheiden. Hier hilft nur eine sorgfältige Untersu¬ 
chung des Programms und gegebenenfalls das Aufschreiben der 
Funktionszuweisung, damit man letztere, wenn sie aufgerufen 
wird, immer zur Hand hat. 

Bei mehrfach verschachtelten Funktionen muß man immer überle¬ 
gen, wie der Computer sie verarbeitet. Als erstes wird stets der 
Wert der innersten Klammer bestimmt. 
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Schleifenläufe analysieren 

Mit am schwersten zu verstehen sind Schleifenläufe, in denen auch 
die Indices von Feldvariablen verändert werden, wie es zum Bei¬ 
spiel bei vielen Sortierprogrammen der Fall ist. Wenn derartige 
Befehlsfolgen nicht durchschaubar sind, sollte man den Computer 
zu Hilfe rufen. Da es sich meist nur um wenige Befehle handelt, 
kann man sie als kleines Testprogramm eingeben und ausprobieren, 
wie die einzelnen Variablen durch das Programm verändert werden. 


10 REM Bubblesort 





20 REM Zu sortierendes 

Feld in A<x) 

1000 N = 5 
1010 FÜR K = 

2 TO N 





1020 FÜR J = 

N TO K 

STEP 

-1 


1030 IF A(J-l) > A(J) 

THEN 1050 

1040 GOTO 1070 





1050 Y=A(J); 

A(J)=A(J- 

1) : 

A(J 

-1)=Y 

1070 NEXT J 
1080 NEXT K 
1090 PRINT 






30 FÜR K = 1 

TO 5 





40 A(K> = 10- 

-K 





50 PRINT A(K) 

NEXT K 




60 PRINT:PRINT 





2000 FÜR K=1 

TO 5 





2010 PRINT A(K)? 





2020 NEXT 






1051 PRINT Kj 

1J,A(1); 

!A(2); 

A(3) 

;A(4);A(5) 

RUN 






9 8 7 6 

5 





2 5 

9 

8 

7 

5 

6 

2 4 

9 

8 

5 

7 

6 

2 3 

9 

5 

8 

7 

6 

2 2 

5 

9 

8 

7 

6 

3 5 

5 

9 

8 

6 

7 

3 4 

5 

9 

6 

8 

7 

3 3 

5 

6 

9 

8 

7 

4 5 

5 

6 

9 

7 

8 

4 4 

5 

6 

7 

9 

8 

5 5 

5 

6 

7 

8 

9 

5 6 7 8 

READY 

9 






Abb. 20: Analyse eines Programms mit verschachtelten Schleifen 

Da derartige Programme oft schwer zu durchschauen sind, wird im 
Programm an geeigneter Stelle ein PRINT-Befehl eingesetzt, der alle 
Variablen bei jedem Schleifenlauf ausgibt Dadurch sind Verände¬ 
rungen gut zu erkennen. Da es sich hier um ein Sortierprogramm 
handelt, muß vorher noch die unsortierte Folge eindeutig bestimmt 
und nachher das Ergebnis ausgegeben werden 
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Hierbei gehe man aber gezielt vor und beachte folgende Hinweise: 

- Vor den zu testenden Programmteil sind einige Befehle zu 
schreiben, in denen den verwendeten Variablen eindeutige Werte 
zugewiesen werden. 

- Ebenso müssen am Ende einige Befehle stehen, die das Ergebnis 
der Schleifenläufe zeigen. 

- Gegebenenfalls ist die Anzahl der Schleifenläufe, soweit sinnvoll, 
zu begrenzen, z. B. durch entsprechende Voreinstellung im 
FOR-Befehl. 

- Um zu sehen, was in jeder Schleife passiert, kann dort ein provi¬ 
sorischer STOP-Befehl eingebaut werden. Man kann dann nach 
dem Anhalten des Programms im Direktbetrieb die Variablen¬ 
inhalte ausgeben lassen. 

- Sehr zweckmäßig ist es auch, direkt in die Schleifen zusätzliche 
PRINT-Befehle einzusetzen, die die Werte der in der Schleife 
geänderten Variablen ausgeben. 

- Wenn in der Schleife der Index einer Feldvariablen verändert 
wird, muß auch die dazugehörige Variable selbst gedruckt 
werden. 

- Zusätzliche Testbefehle sollten niemals an eine Befehlszeile ange¬ 
hängt werden, sondern stets in einer neuen Zeilennummer ste¬ 
hen. Empfehlenswert ist es hierfür zum Beispiel, immer Zeilen¬ 
nummern, die mit einer 1 enden, zu verwenden. Man erkennt die 
Zusatzbefehle dann schnell im Listing und kann sie nach der 
Prüfung wieder löschen. 

- Wenn in der Schleife auch Ausgaben stehen, kann man in den 
Testbefehlen nach PRINT ein Komma setzen, um die Testausga¬ 
ben auf dem Bildschirm von den normalen Ausgaben abzu¬ 
heben. 


Programmprüfung im Trace-Betrieb 

Der von vielen BASIC-Dialekten angebotene Trace-Betrieh, bei 
dem alle vom Programm durchlaufenen Zeilen auf dem Bildschirm 
gezeigt werden, ist nur begrenzt zur Prüfung eines Programmab¬ 
laufs brauchbar. Das unkontrollierte Einsetzen des TRACE- 
Befehls in ein Programm führt nur zu einem Zahlenwirrwarr auf 
dem Bildschirm. Wenn der Programmlauf hiermit geprüft werden 
soll, ist die Beachtung der folgenden Hinweise zweckmäßig: 

- TRAGE nur dort in das Programm schreiben, wo der Ablauf 
unklar ist - und sofort danach mit TROFF wieder aufheben. 

- Damit die Ausgabe der im Trace-Betrieb angezeigten Zeilen- 
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nummern sich von den im Programm geforderten Ausgaben 
abhebt, muß vor die im Programm stehenden PRINT-Befehle 
ein leerer PRINT-Befehl gesetzt werden. 

8.5 Beispiele für Programmanalysen 

Wieweit es notwendig ist, ein Programm zum Verständnis vollstän¬ 
dig zu analysieren, hängt natürlich vom Kenntnisstand des Benut¬ 
zers ab. Im folgenden wird an zwei kleinen Beispielen gezeigt, wie 
ein Programm untersucht werden kann, wenn der Programmablauf 
beim bloßen Durchsehen nicht klar geworden ist. 

Programm: »Stichwörter einsortieren« (bezieht sich auf 
Seite 179) 

Wie der Titel sagt, handelt es sich um ein Programm, das Stichwör¬ 
ter sortiert. Dabei kann davon ausgegangen werden, daß die Ord¬ 
nung nach dem Alphabet erfolgt. Wie dies abläuft, ist aber nicht zu 
erkennen. 

Auf welche Weise die Markierung des Programms geschehen kann, 
ist bereits in der Abb. 18 gezeigt. Man erkennt, daß im Programm 
fünf jeweils mit geraden lOOer-Nummern beginnende Module 
stehen. 

1. Dimensionierung und Wahl des Programmlaufs 

2. Einlesen des alten Stichwortverzeichnisses von der Diskette 

3. Eingeben und Sortieren der Stichwörter 

4. Abspeichern des sortierten Verzeichnisses 

5. Ausgeben der sortierten Stichwörter. 

Man ersieht im Initialisierungsmodul am Befehl CLEAR 10 000, 
daß das Programm für ein Genie oder einen TRS 80 geschrieben 
wurde. Das 2. und das 4. Modul weisen aus, daß mit Diskettenspei¬ 
cherung gearbeitet wird. Da die Speicherung aber am Beginn bezie¬ 
hungsweise Ende des eigentlichen Sortiermoduls erfolgt, könnte 
auch auf Kassettenspeicherung umgestellt werden. 

Die danach aufgestellte Zeilen-Ablaufliste in Abb. 19, Seite 180, 
läßt erkennen, daß beim ersten Anlegen des Stichwortverzeichnis¬ 
ses das Modul zum Einlesen des alten Verzeichnisses übersprungen 
wird. Im übrigen laufen dann die Module sequentiell, also in der 
Reihenfolge, in der sie im Programm stehen, hintereinander ab. 

Wenn die Arbeitsweise des Programms jetzt noch nicht klar ist, 
müssen die Module im einzelnen untersucht werden. Dabei ist eine 
Variablenliste anzulegen, die - allerdings erst am Ende der Unter¬ 
suchung - wie folgt aussieht: 
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z 

Zähler für Stichwörter 

K 

Schleifenzähler 

X 

Hilfsvariable 

XI 

eingegebenes Stichwort 

Y| 

Eingabevariable 

Bl 

erste Stelle eines Stichwortes 

X|(x) 

Feld für Stichwörter 

H(x) 

Indexfeld für Stichwortfeld. 


Im ersten Modul wird ein Zeichenketten- und ein Zahlenfeld 
dimensioniert. Wofür diese verwendet werden, ist erst im zweiten 
Modul zu erkennen. Da die Stichwörter in Feld X$(x) mit dem 
gleichen Index wie im Feld H(x) laufen, ist zu vermuten, daß letzte¬ 
res nur als Indexfeld dient. Die Variable Z dient als Zähler für die 
Stichwörter, denn durch sie wird die Leseschleife begrenzt. Sie 
wird darum auch als erste von der Datei gelesen. 

Im dritten Modul steht der Eingabebefehl für die Stichwörter, und 
man erkennt, wie die Eingabe zu beenden ist, und daß bei jeder 
Eingabe der Zähler erhöht wird. 

In den folgenden Befehlen wird das erste Zeichen vom Eingabe¬ 
string abgetrennt und geprüft, ob es einen größeren ASCII-Wert 
als 96 hat. Ein Blick auf die Codetabelle zeigt, daß es sich dann um 
einen Kleinbuchstaben handeln muß. In diesem Fall erfolgt ein 
Sprung nach Zeile 290, wo der Eingabestring dem Element des 
Feldes X(x) mit dem Index Z zugewiesen wird. Zugleich wird auch 
Z noch einmal im gleichen Element des Indexfeldes H(x) abgelegt. 

Wenn als erstes ein Großbuchstabe gefunden wurde, wird 32 - also 
der Unterschied zwischen Groß- und Kleinbuchstaben - im 
ASCII-Code hinzuaddiert und dann der entsprechende Kleinbuch¬ 
stabe vorn an die anderen Zeichen des Eingabestrings gesetzt. So 
können beliebig abwechselnd mit großen oder kleinen Anfangs¬ 
buchstaben eingegebene Stichwörter einheitlich nach dem Alpha¬ 
bet sortiert werden. 

Da das Programm nach Zeile 290 gleich mit Zeile 300 weiterläuft, 
ist zu erkennen, daß nach jeder Eingabe sortiert wird. Dies 
geschieht in der Weise, daß das neue Stichwort, am Ende des Feldes 
beginnend, in einer Schleife jeweils mit dem vorstehenden Element 
verglichen wird. Ist dieses größer als das neue Element, heißt dies, 
daß es im Alphabet vor diesem einzuordnen ist, und die Sortier¬ 
schleife wird abgebrochen. 
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Umgekehrt wird, wenn das neue Element nicht größer als das vor¬ 
herstehende ist, nur das Indexfeld umgestellt, was schneller geht als 
die Umstellung der Elemente eines Zeichenkettenfeldes. 

Im vierten Modul wird nach Beendigung der Eingabe eine sequen¬ 
tielle Datei geöffnet, und es wird dort zuerst der Zählerstand, dann 
werden die Elemente beider Felder gespeichert. 

Im Ausgabemodul werden die Stichwörter in der Reihenfolge der 
Sortierung im Indexfeld ausgegeben. 


Programm: »Aufteilung in Gruppen« 

Bei dem in Abb. 21 gezeigten Programm ist nicht gleich auf den 
ersten Blick zu erkennen, welchem Zweck es dient. Die Analyse 
wird darum auch wieder mit der Markierung der Programm- 
Module begonnen. 

1. Initialisierung und Abfrage 

2. Einordnung eines Teilnehmers in eine Gruppe 

3. Einordnung eines Teilnehmers in eine Gruppe 

4. Ausgabe der Gruppeneinteilung. 


10 REM Aufteilung in Gruppen AUFTEIL 627 Byte 
20 CLS: INPUT"Tei 1 nehmerzahl; T 
30 INPUT"Wievi ele Gruppen'*;G 
40 TG=INT(T/G>: 

50 DIM G»(G-H,TG-H) 


rlOO FÜR K = 1 Tü TG*G 
110 INPUT"Name oder Kürzel eingeben“; 
120 N=RND(G) 

►130 FOR J = 1 Tü TG 

140 IF G$(N,J) <> "" THEN 160 

150 G»(N,J)=N«; GÜSUB 300: GOTO 180 

160 NEXT J 

170 GOTO 120 

180 NEXT K 

190 IF T = TG»G THEN 400 _ 


f200 FOR K = TG«G+1 TO T 
210 INPUT"Name oder Kürzel eingeben“;N4> 
220 N=RND<G) 

230 IF G«(N,TG4-1)<>"" THEN 220 
240 G$(N,TG+1)=N*: GOSUB 300 
>250 NEXT 
260 GOTO 400 


300 PRINT; PRINT"TeiInehmer 
310 RETURN 


’;N*;" zur Gruppe "N 


r400 CLS: FOR K = 1 TO G STEP 2 

410 PRINT"GRUPPE";K,"GRUPPE";K+1: PRINT 

r420 FOR J = 1 TO TG+1 

430 PRINT G»(K,J), G*(K-H,J) 

^40 NEXT J 
1-450 NEXT K; END 


Abb. 21: Programm »Aufteilung in Gruppen« mit Markierung 
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Außerdem gibt es noch ein Unterprogramm (das aus den Modulen 
2 und 3 angerufen wird), in dem einem Teilnehmer mitgeteilt wird, 
zu welcher Gruppe er gehört. 

Der Programmablauf ist hier sehr einfach, da die vier Module nach 
Abarbeitung der darin programmierten Schleifen nacheinander 
laufen. 

Da auch hier der Lauf der einzelnen Module nicht sofort klar ist, 
wird eine Variablenliste angelegt: 


T 

Teilnehmerzahl, die in Gruppen aufgeteilt wird 

G 

Anzahl der Gruppen 

TG 

Teilnehmer pro Gruppe ohne Überhang 

J,K 

Laufvariable 

N 

zufallsbedingte Gruppennummer 

N$ 

eingegebener Teilnehmername 

G$ (x,y) 

zweidimensionales Feld für verteilte Teilnehmer 
mit 

X = 

Gruppennummer 

y = 

Nummer in der Gruppe. 


Bei der Analyse fällt im 1. Modul die besondere Art der Dimensio¬ 
nierung für das Feld auf. Es ist vorläufig nicht zu ermitteln, warum 
die Zeilen und Spalten der Matrix um den Wert 1 höher dimensio¬ 
niert werden, als es Gruppen beziehungsweise Teilnehmer gibt. 
Hier offenbart sich aber die Bedeutung von TG. Es ist die Anzahl 
der Teilnehmer pro Gruppe, die dort eingeteilt werden können, 
wenn die Teilnehmerzahl, dividiert durch die Gruppenzahl, keinen 
Rest ergibt. 

Im zweiten Modul ersieht man aus der RND-Funktion in Zeile 
120, mit der die Gruppennummer bestimmt wird, daß dieses Pro¬ 
gramm wahrscheinlich auf einem Genie, einem TRS 80 oder einem 
Acorn geschrieben wurde. Denn bei diesen Computern ergibt eine 
ganzzahlige positive Zahl als Argument Zufallszahlen zwischen 
1 und dieser Zahl. 

Es laufen zwei verschachtelte Schleifen. In der äußeren werden die 
Teilnehmer eingeteilt, die gleichmäßig ohne Überhang auf die 
Gruppen verteilt werden können. In der inneren Schleife geschieht 
in Zeile 150 jeweils eine Prüfung, ob ein Gruppenplatz schon 
besetzt ist. Wenn dies der Fall ist, erfolgt die Erhöhung der Laufva¬ 
riablen, und der nächste Platz wird untersucht. Hierbei läuft die 
Schleife maximal so oft, wie Teilnehmer ohne Überhang in eine 
Gruppe eingewiesen werden können. 
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Wenn eine Gruppe voll ist, wird eine neue Zufallszahl, also eine 
neue Gruppennummer, angefordert, und die innere Schleife läuft 
neu, bis alle Teilnehmer ohne Überhang verteilt sind. Der Befehl in 
Zeile 190 sorgt schließlich dafür, daß das nächste Modul über¬ 
sprungen wird, wenn kein Teilnehmerüberhang vorhanden ist. 

Im dritten Modul werden die Überhangteilnehmer verteilt. Da pro 
Gruppe nur ein Teilnehmer zugewiesen zu werden braucht, entfällt 
die innere Schleife. Sonst ähneln die Befehle dem Modul 2. 

Im vierten Modul erfolgt die Ausgabe der den einzelnen Gruppen 
zugeteilten Teilnehmer. Es werden zwei verschachtelte Schleifen 
verwendet, die erste für die Gruppen, die zweite für die Teilneh¬ 
mer. Aus Zeilen 410 und 430 ist ersichtlich, daß in 2 Spalten 
gedruckt wird. Jetzt kommt man auch dahinter, warum die Felder 
um den Wert 1 höher dimensioniert wurden. Dies ist nötig, da bei 
ungerader Gruppenzahl die Gruppennummer K sonst in der letz¬ 
ten rechten Spalte größer würde, als es die Dimensionierung zuläßt. 

Diese kleinen Beispiele zeigen schon, daß es einiger Überlegungen 
bedarf, um ein Programm zu analysieren, sofern es alle Möglichkei¬ 
ten ausnutzt, die BASIC bietet. Bei großen Programmen kann diese 
Arbeit sehr mühsam sein. Aber aus der Analyse fremder Pro¬ 
gramme läßt sich viel lernen. Das gilt im positiven Sinn, wenn diese 
gut geschrieben sind, aber auch negativ, wenn man in fremden 
Programmen erkennt, wie man es eigentlich nicht machen sollte. 
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LINE42,110,113,116,118, 

126.133.138.141, 

LINE INPUT 24. 76. 146 

LINE INPUT # 99. 116, 126 

LIST 12 

LIST/P 132 

LUST 27, 89 

LN 95, 133 

LOAD 28,31,136 

LOC 23,101,106,119,124,139 

LOCAL 95 

LOCATE 24, 81, 102, 116, 
117, 131, 138, 149 
LOCATES 113 
LOF23.101,106,113,119, 

124,139 

LOG 16,130 

LOGIN 112 

LOWERS130 

LPRINT27,89 

LSET34.100,106,119,124 

M 

MAT 25 

MAX 130 

ME AN 105 

MEM62 

MEMORY 130 

MID$17.99.150,156, 168 

MIN 130 

MKDS 34.101,106,119,124.139 

MOD 25.147 

MODE GR 133 

MODE TL 133 

MODE TN 133 

MODE TS 133 

MON99,133 

MOTOR 110,111,117,125,137 
MOVE 95,116,131,133 
MOVER 131 
MUSIC129,134 
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N 

NEW 12. 31 
NEXT20 
NOFLOW 38 
NORMAL 97 
NOTRACE 38 
NPLOT123 
NSHAPE 47.123 
NUM 115 

NUMBER 142. 143 

O 

&0 117, 125 
OKT$99. 112, 137 
OLD 95 

ON ERROR GOTO 26 
ON...GOSUB20 
ON...GOTO 20 
ONPEN 141 

OPEN 27. 30. 98.111.113. 
118.119.124.126.139.141 
OPEN# 144 
OPEN...FOR 100 
OPENIN96. 131 
OPENOUT96. 131 
OPTION BASE 25, 63, 99, 
104, 112, 115, 117, 143, 152 
OR 83, 170 
ORIGIN 131 
OUT 24 


P 

PADDLE 102 
PAGESIZE115 

PAINT48,110.118.123.126,138 

PAPER 128.131,136 

PATTERN 128 

PAUSE 114. 135 

PCLEAR41. 110 

PCOLOR133 

PCOPY110 

PDIR116 

PEEK35.85. 171 

PEN 116.141 

PHOME133 

PLAY103.111.118.123.126, 

129.131, 138 

PLOT 41.42, 95,97.116, 

121.128.136 

PLOT INVERSE 136 

PMODE41 

POINT42.113,121.123.128 
POKE35.40. 79.81.85.171 
POP97.102,115,128 
POS 23,73.97.115 
PR# 97 

PRESET100.110. 113. 118. 126 
PRINT 20, 40, 77, 115 
PRINT #30,32,96,103,108, 
111,113,116,119,124,126, 
131, 139, 141, 143, 144 
PRINT ALL 115 
PRINT AT 25. 81.149 
PRINT@ 25.80.163 
PRINTER IS 115 
PRINT/P 132 
PRINT/T 134 


PRINT USING 25.146 
PROC 95 

PSET41.110.113,118.126, 141 

PTRIG 102 

PUT34.118,138 

PUT# 101.103.106.108.119, 

124.139 

PUT%113 

PUTSPRITE 138 

Q 

QUAD105 

R 

RAD 95.102.115.130 
RAM 120 
RAND 135 
RANDOMIZE 25. 72 
RANDON 72 
READ 20,32. 98 
READ# 116 
REAL 115 
RECALL31.121 
RECORD# 109 
RECORD a.b33 
RELEASE 128 
REM 20 
RENUM38 

REPEAT...UNTIL25.95.128.148 

RESEQUENCE142 

RESET42.121,123.133 

RESTORE20. 25.153 

RESUME26 

RETURN 21 

RIGHTS 17.150 

RLINE133 

RMOVE133 

RND17.71.173 

ROPEN 134 

ROUND 130 

RSET34.101,106.119.124 
RUN 12 

S 

SAVE 31.28.136 
SCALE 47.116.123 
SCATCH114 
SCR12 
SCRATCH 32 

SCREEN25.41.48.117.135. 

137.141,143 

SCROLL135 

SD 105 

SEG$17.150 

SET41.121,123,133 

SETCOLOR 103 

SET TIME 115 

SGN16 

SHAPE 47.123 
SHORT 115 
SIN 16. 70 
SIZE132 
SKIPF110 

SOUND 49. 95.110.111.118. 

126.129.131.138 

SPC17.79 

SPEED 97 

SPRITES 138 


SQR16 
STAT104.112 
STATCLEAR104 
STATUS 102.107 
STEP 21.38 
STICK 102 
STOP 12, 21.117 
STORE 31.115,121 
STR 115 
STR$18.162 
STRINGS 23.151 
SUM 105 

SWAP 25.133.149 
SWITCH 137 
SYMBOL 131 
SYS 37 

T 

TAB 17,73, 79 
TABCNT112 
TAN 16 

TIME 95.107.115,125. 130.13/ 

TIME$23.104.107,117 

TIMER 110 

TIMESS 112 

TITLE 112 

TRACE 38 

TROFF 38 

TRON 38 

TRUNC23 

U 

UNBREAK 143 
UNPLOT 121,136 
UNTRACE 38 
UPPERS 130 
USR37.87.133 

V 

VAL 18 
VALS 115 

VARPTR 36.86.172 
VCHAR143 
VDU 95' 

VERIFY 28 
VLIN97 
VLINE42 
VPEEK121 
VPOKE 121 
VPOS95.130 
VTAB 80 

W 

WAIT 25, 97. 99. 107.115. 117. 

125,128.130.137 

WEND117 

WHILE 25,117 

WHILE...WEND112,130, 148 

WIDTH 100. 112,130 

WIND 112 

WINDOW 130 

WOPEN 134 

WRITE 32.98 


X 

XOR112,117,130 
XPOS131 
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humb»ldt 

Sucher/ die zur Suche kommen! 

Der Autor: Dr. Hans-Joachim Sacht hat sich 
seit der Einführung von Mikroprozessoren in 
Europa mit deren Technik und Anwendung 
befaßt in unzähiigen Seminaren machte er auch 
NichUFachieute mit Mikrocomputern und 
Programmiersprachen bekannt Er gehört zu den 
meistgeiesenen Fachautoren, 

• Sie erfahren hier, wie sich die BASIC-Versionen der 
wichtigsten Home- und Personal-Computer unter¬ 
scheiden und wie man BASIC-Dialekte analysiert. 

• In diesem Band finden Sie die BASIC-Dialektbesonder- 
heiten von Acorn BBC und Electron, Apple Ile, Alphatronic PC, 

Atari, Casio PP-200, Commodore 3000/4000/8000, 

Commodore VC 20 und 64; Epson HX-20, Dragon, Genie und 
Colour Genie, Hewlett-Packard HP 86, IBM PC und IBM 
Compatible Computer, MSX Standard, Oric Atmos, Laser 
310/2001/VZ 200, Schneider CPC 464, Sharp MZ-80 und 
MZ-700, Sinclair ZX 81 und Spectrum, Spectra Video SV-318 
und SV-328, Tandy TRS 80, Thomson TO 7, Texas Instruments 
TI 99/4A ... 

• Sie erhalten viele Hinweise, wie fehlende BASIC-Befehle 
ersetzt werden können. 

• Wir erklären BASIC-Routinen, die nicht auf den ersten Blick 
verständlich sind, und geben Anleitungen, wie ein fremdes 
Programm umgestellt werden kann. 

Praktische Ratgeber 





























